/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / astronomy / ssystem

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 44 01 00 00 a4 01 00 00 |Archive.|D.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 53 53 79 73 74 65 | 6d 00 00 00 ff ff ff ff |.!SSyste|m.......|
|00000070| 45 dc fd ff da a5 c5 1e | 00 00 00 00 ff ff ff ff |E.......|........|
|00000080| 20 01 00 80 82 21 42 6f | 6f 74 00 00 04 00 00 00 | ....!Bo|ot......|
|00000090| b4 00 00 00 44 eb ff ff | 4e a8 f7 2c 03 00 7b 86 |....D...|N..,..{.|
|000000a0| b4 00 00 00 24 00 00 00 | 82 21 48 65 6c 70 00 00 |....$...|.!Help..|
|000000b0| 04 00 00 00 85 03 00 00 | 45 ff ff ff 46 31 b4 1e |........|E...F1..|
|000000c0| 03 00 e8 98 85 03 00 00 | fc 00 00 00 82 21 52 75 |........|.....!Ru|
|000000d0| 6e 00 04 00 04 00 00 00 | 54 00 00 00 44 eb ff ff |n.......|T...D...|
|000000e0| 4f 7b 60 12 03 00 94 43 | 54 00 00 00 a5 04 00 00 |O{`....C|T.......|
|000000f0| 82 21 52 75 6e 69 6d 61 | 67 65 00 00 b6 36 00 00 |.!Runima|ge...6..|
|00000100| 44 fb ff ff 5f 4d 3a ea | 03 00 15 9c b6 36 00 00 |D..._M:.|.....6..|
|00000110| 1d 05 00 00 82 21 53 70 | 72 69 74 65 73 00 00 00 |.....!Sp|rites...|
|00000120| e0 02 00 00 43 f9 ff ff | f1 ce b2 f7 03 00 72 c0 |....C...|......r.|
|00000130| e0 02 00 00 f7 3b 00 00 | 82 54 65 6d 70 6c 61 74 |.....;..|.Templat|
|00000140| 65 73 00 00 0f 04 00 00 | 44 ec ff ff c1 7d 09 ea |es......|D....}..|
|00000150| 03 00 45 e7 0f 04 00 00 | fb 3e 00 00 00 00 00 00 |..E.....|.>......|
|00000160| c3 00 04 00 04 00 00 00 | 10 00 00 00 00 00 00 00 |........|........|
|00000170| 07 00 00 00 2c 00 00 00 | 80 01 00 00 b8 f5 23 02 |....,...|......#.|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| b0 01 00 00 46 69 6c 65 | 44 61 74 61 82 21 42 6f |....File|Data.!Bo|
|000001b0| 6f 74 00 00 04 00 00 00 | b4 00 00 00 44 eb ff ff |ot......|....D...|
|000001c0| 4e a8 f7 2c 03 00 7b 86 | 49 63 6f 6e 53 70 72 69 |N..,..{.|IconSpri|
|000001d0| 74 65 73 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 21 |tes <Obe|y$Dir>.!|
|000001e0| 53 70 72 69 74 65 73 0a | 7c 20 54 68 69 73 20 66 |Sprites.|| This f|
|000001f0| 69 6c 65 20 68 61 73 20 | 62 65 65 6e 20 69 6e 6e |ile has |been inn|
|00000200| 6f 63 75 6c 61 74 65 64 | 20 61 67 61 69 6e 73 74 |oculated| against|
|00000210| 20 74 68 65 20 45 78 74 | 65 6e 64 20 56 69 72 75 | the Ext|end Viru|
|00000220| 73 0a 7c 7c ff 0a 0d 7c | 20 49 6e 6e 6f 63 75 6c |s.||...|| Innocul|
|00000230| 61 74 65 64 20 61 67 61 | 69 6e 73 74 20 45 58 54 |ated aga|inst EXT|
|00000240| 45 4e 44 20 62 79 20 4b | 49 4c 4c 56 49 52 55 53 |END by K|ILLVIRUS|
|00000250| 20 28 76 31 2e 30 30 29 | 2c 20 57 72 69 74 74 65 | (v1.00)|, Writte|
|00000260| 6e 20 62 79 20 53 74 75 | 61 72 74 20 54 79 72 72 |n by Stu|art Tyrr|
|00000270| 65 6c 6c 0d 7c 20 4f 4b | 0a 7c 7c ff 46 69 6c 65 |ell.| OK|.||.File|
|00000280| 44 61 74 61 82 21 48 65 | 6c 70 00 00 04 00 00 00 |Data.!He|lp......|
|00000290| 85 03 00 00 45 ff ff ff | 46 31 b4 1e 03 00 e8 98 |....E...|F1......|
|000002a0| 54 68 69 73 20 69 73 20 | 21 53 53 79 73 74 65 6d |This is |!SSystem|
|000002b0| 2c 20 76 65 72 73 69 6f | 6e 20 31 2e 32 32 20 28 |, versio|n 1.22 (|
|000002c0| 32 37 20 4a 61 6e 20 31 | 39 39 34 29 0a 0a 54 68 |27 Jan 1|994)..Th|
|000002d0| 69 73 20 70 72 6f 67 72 | 61 6d 20 69 73 20 6f 6e |is progr|am is on|
|000002e0| 65 20 74 68 61 74 20 64 | 65 6d 6f 6e 73 74 72 61 |e that d|emonstra|
|000002f0| 74 65 73 20 74 68 65 20 | 6d 6f 76 65 6d 65 6e 74 |tes the |movement|
|00000300| 73 20 6f 66 20 70 6c 61 | 6e 65 74 73 20 69 6e 20 |s of pla|nets in |
|00000310| 74 68 65 20 73 6f 6c 61 | 72 0a 73 79 73 74 65 6d |the sola|r.system|
|00000320| 2c 20 74 68 65 20 72 61 | 74 69 6f 73 20 6f 66 20 |, the ra|tios of |
|00000330| 74 68 65 20 73 70 65 65 | 64 73 20 61 6e 64 20 6f |the spee|ds and o|
|00000340| 72 62 69 74 61 6c 20 73 | 69 7a 65 20 62 65 69 6e |rbital s|ize bein|
|00000350| 67 20 66 61 69 72 6c 79 | 20 61 63 63 75 72 61 74 |g fairly| accurat|
|00000360| 65 2e 0a 4e 6f 20 61 74 | 74 65 6d 70 74 20 68 61 |e..No at|tempt ha|
|00000370| 73 20 62 65 65 6e 20 6d | 61 64 65 20 74 6f 20 6d |s been m|ade to m|
|00000380| 61 6b 65 20 74 68 65 20 | 6f 72 62 69 74 73 20 74 |ake the |orbits t|
|00000390| 72 75 65 20 65 6c 6c 69 | 70 73 65 73 2c 20 74 68 |rue elli|pses, th|
|000003a0| 65 79 20 61 72 65 0a 64 | 65 73 63 72 69 62 69 6e |ey are.d|escribin|
|000003b0| 67 20 70 75 72 65 6c 79 | 20 63 69 72 63 75 6c 61 |g purely| circula|
|000003c0| 72 20 6d 6f 74 69 6f 6e | 2e 0a 0a 54 68 65 20 72 |r motion|...The r|
|000003d0| 65 73 75 6c 74 69 6e 67 | 20 70 72 6f 67 72 61 6d |esulting| program|
|000003e0| 20 68 61 73 20 62 65 65 | 6e 20 27 73 68 72 75 6e | has bee|n 'shrun|
|000003f0| 6b 27 20 75 73 69 6e 67 | 0a 21 42 61 73 53 68 72 |k' using|.!BasShr|
|00000400| 69 6e 6b 20 62 79 20 4a | 6f 68 6e 20 57 61 6c 6c |ink by J|ohn Wall|
|00000410| 61 63 65 2e 0a 0a 54 68 | 61 6e 6b 73 20 67 6f 20 |ace...Th|anks go |
|00000420| 61 73 20 75 73 75 61 6c | 20 74 6f 20 50 61 75 6c |as usual| to Paul|
|00000430| 20 48 6f 62 62 73 20 77 | 68 6f 20 70 72 6f 76 69 | Hobbs w|ho provi|
|00000440| 64 65 64 20 74 68 65 20 | 52 69 73 63 4f 73 20 70 |ded the |RiscOs p|
|00000450| 72 6f 67 72 61 6d 20 21 | 53 68 65 6c 6c 0a 61 72 |rogram !|Shell.ar|
|00000460| 6f 75 6e 64 20 77 68 69 | 63 68 20 74 68 69 73 20 |ound whi|ch this |
|00000470| 70 72 6f 67 72 61 6d 20 | 77 61 73 20 77 72 69 74 |program |was writ|
|00000480| 74 65 6e 2e 0a 0a 0a 46 | 75 72 74 68 65 72 20 64 |ten....F|urther d|
|00000490| 65 74 61 69 6c 73 20 61 | 62 6f 75 74 20 45 76 6e |etails a|bout Evn|
|000004a0| 74 53 68 65 6c 6c 20 6d | 61 79 20 62 65 20 6f 62 |tShell m|ay be ob|
|000004b0| 74 61 69 6e 65 64 20 66 | 72 6f 6d 20 74 68 65 20 |tained f|rom the |
|000004c0| 61 75 74 68 6f 72 3a 0a | 0a 50 61 75 6c 20 48 6f |author:.|.Paul Ho|
|000004d0| 62 62 73 0a 52 68 65 69 | 6e 70 66 61 6c 7a 73 74 |bbs.Rhei|npfalzst|
|000004e0| 72 61 73 73 65 20 32 0a | 38 35 30 34 39 20 49 6e |rasse 2.|85049 In|
|000004f0| 67 6f 6c 73 74 61 64 74 | 0a 47 65 72 6d 61 6e 79 |golstadt|.Germany|
|00000500| 0a 0a 54 68 65 20 68 65 | 61 70 20 6d 61 6e 61 67 |..The he|ap manag|
|00000510| 65 72 20 72 6f 75 74 69 | 6e 65 73 20 75 73 65 64 |er routi|nes used|
|00000520| 20 62 79 20 45 76 6e 74 | 53 68 65 6c 6c 20 61 72 | by Evnt|Shell ar|
|00000530| 65 20 63 6f 70 79 72 69 | 67 68 74 20 52 69 73 63 |e copyri|ght Risc|
|00000540| 20 55 73 65 72 20 61 6e | 64 20 61 72 65 20 75 73 | User an|d are us|
|00000550| 65 64 20 77 69 74 68 20 | 70 65 72 6d 69 73 73 69 |ed with |permissi|
|00000560| 6f 6e 2e 0a 0a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |on...---|--------|
|00000570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 0a 0a 41 6e 79 20 | 69 6d 70 72 6f 76 65 6d |--..Any |improvem|
|000005c0| 65 6e 74 73 20 6f 72 20 | 62 75 67 73 2c 20 70 6c |ents or |bugs, pl|
|000005d0| 65 61 73 65 20 72 65 70 | 6f 72 74 20 74 6f 20 3a |ease rep|ort to :|
|000005e0| 2d 0a 0a 52 6f 62 65 72 | 74 20 53 65 61 67 6f 2e |-..Rober|t Seago.|
|000005f0| 0a 0a 34 30 20 41 6c 74 | 6f 6e 20 50 61 72 6b 20 |..40 Alt|on Park |
|00000600| 52 6f 61 64 20 0a 43 6c | 61 63 74 6f 6e 20 4f 6e |Road .Cl|acton On|
|00000610| 20 53 65 61 0a 45 73 73 | 65 78 2e 0a 0a 43 4f 31 | Sea.Ess|ex...CO1|
|00000620| 35 20 31 45 44 46 69 6c | 65 44 61 74 61 82 21 52 |5 1EDFil|eData.!R|
|00000630| 75 6e 00 04 00 04 00 00 | 00 54 00 00 00 44 eb ff |un......|.T...D..|
|00000640| ff 4f 7b 60 12 03 00 94 | 43 53 65 74 20 53 53 79 |.O{`....|CSet SSy|
|00000650| 73 74 65 6d 24 44 69 72 | 20 3c 4f 62 65 79 24 44 |stem$Dir| <Obey$D|
|00000660| 69 72 3e 0a 57 69 6d 70 | 53 6c 6f 74 20 2d 6d 69 |ir>.Wimp|Slot -mi|
|00000670| 6e 20 31 32 38 4b 20 2d | 6d 61 78 20 31 32 38 4b |n 128K -|max 128K|
|00000680| 0a 52 75 6e 20 3c 4f 62 | 65 79 24 44 69 72 3e 2e |.Run <Ob|ey$Dir>.|
|00000690| 21 52 75 6e 69 6d 61 67 | 65 0a 0a 0a 0a 46 69 6c |!Runimag|e....Fil|
|000006a0| 65 44 61 74 61 82 21 52 | 75 6e 69 6d 61 67 65 00 |eData.!R|unimage.|
|000006b0| 00 b6 36 00 00 44 fb ff | ff 5f 4d 3a ea 03 00 15 |..6..D..|._M:....|
|000006c0| 9c 0d 00 0a 1f f4 20 3e | 20 3c 53 53 79 73 74 65 |...... >| <SSyste|
|000006d0| 6d 24 44 69 72 3e 2e 21 | 52 75 6e 49 6d 61 67 65 |m$Dir>.!|RunImage|
|000006e0| 0d 00 14 34 ee 20 85 20 | 20 eb 31 32 3a c8 99 22 |...4. . | .12:.."|
|000006f0| 48 6f 75 72 67 6c 61 73 | 73 5f 53 6d 61 73 68 22 |Hourglas|s_Smash"|
|00000700| 3a f6 3a f1 22 20 61 74 | 20 6c 69 6e 65 3a 20 22 |:.:." at| line: "|
|00000710| 3b 9e 3a e0 0d 00 1e 1f | 76 65 72 73 69 6f 6e 24 |;.:.....|version$|
|00000720| 3d 22 31 2e 31 30 20 28 | 32 36 2d 4d 61 79 2d 39 |="1.10 (|26-May-9|
|00000730| 32 29 22 0d 00 28 0d de | 20 71 25 20 31 35 30 30 |2)"..(..| q% 1500|
|00000740| 0d 00 32 11 de 20 62 75 | 66 66 65 72 31 25 20 32 |..2.. bu|ffer1% 2|
|00000750| 30 0d 00 3c 0e 24 71 25 | 3d 22 54 41 53 4b 22 0d |0..<.$q%|="TASK".|
|00000760| 00 46 33 c8 99 20 22 57 | 69 6d 70 5f 49 6e 69 74 |.F3.. "W|imp_Init|
|00000770| 69 61 6c 69 73 65 22 2c | 32 30 30 2c 21 71 25 2c |ialise",|200,!q%,|
|00000780| 22 53 53 79 73 74 65 6d | 22 20 b8 20 2c 74 61 73 |"SSystem|" . ,tas|
|00000790| 6b 25 0d 00 50 15 c8 99 | 20 22 48 6f 75 72 67 6c |k%..P...| "Hourgl|
|000007a0| 61 73 73 5f 4f 6e 22 0d | 00 5a 32 41 70 70 44 69 |ass_On".|.Z2AppDi|
|000007b0| 72 24 3d a4 6f 73 5f 56 | 61 72 47 65 74 56 61 6c |r$=.os_V|arGetVal|
|000007c0| 28 71 25 2c 32 30 30 30 | 2c 22 53 53 79 73 74 65 |(q%,2000|,"SSyste|
|000007d0| 6d 24 44 69 72 22 2c 31 | 29 0d 00 64 2a de 20 73 |m$Dir",1|)..d*. s|
|000007e0| 70 31 20 38 30 30 30 30 | 3a 73 70 31 21 34 3d 30 |p1 80000|:sp1!4=0|
|000007f0| 3a 73 70 31 21 38 3d 31 | 36 3a 73 70 31 21 31 32 |:sp1!8=1|6:sp1!12|
|00000800| 3d 31 36 0d 00 6e 45 c8 | 99 20 22 4f 53 5f 53 70 |=16..nE.|. "OS_Sp|
|00000810| 72 69 74 65 4f 70 22 2c | 26 32 30 46 2c 73 70 31 |riteOp",|&20F,sp1|
|00000820| 2c 22 73 63 72 65 65 6e | 22 2c 30 2c 36 32 35 2c |,"screen|",0,625,|
|00000830| 32 35 30 2c 31 32 3a f4 | 20 43 72 65 61 74 65 20 |250,12:.| Create |
|00000840| 27 73 63 72 65 65 6e 27 | 0d 00 78 22 de 20 73 6e |'screen'|..x". sn|
|00000850| 61 6d 65 31 25 20 32 30 | 3a 24 73 6e 61 6d 65 31 |ame1% 20|:$sname1|
|00000860| 25 3d 22 73 63 72 65 65 | 6e 22 0d 00 82 44 c8 99 |%="scree|n"...D..|
|00000870| 20 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 26 | "OS_Spr|iteOp",&|
|00000880| 31 31 38 2c 73 70 31 2c | 73 6e 61 6d 65 31 25 20 |118,sp1,|sname1% |
|00000890| b8 20 2c 2c 73 70 5f 70 | 74 72 31 25 3a f4 20 70 |. ,,sp_p|tr1%:. p|
|000008a0| 74 72 20 74 6f 20 27 73 | 63 72 65 65 6e 27 0d 00 |tr to 's|creen'..|
|000008b0| 8c 39 73 69 63 6f 6e 3d | a4 69 63 6f 6e 5f 63 72 |.9sicon=|.icon_cr|
|000008c0| 65 61 74 65 28 2d 31 2c | 30 2c 30 2c 36 38 2c 36 |eate(-1,|0,0,68,6|
|000008d0| 38 2c 30 2c 30 2c 26 33 | 30 30 32 2c 22 21 53 53 |8,0,0,&3|002,"!SS|
|000008e0| 79 73 74 65 6d 22 29 0d | 00 96 12 63 6c 61 69 6d |ystem").|...claim|
|000008f0| 71 75 65 72 79 24 3d 22 | 22 0d 00 a0 3b 63 6c 61 |query$="|"...;cla|
|00000900| 69 6d 6d 65 6e 75 24 20 | 3d 22 22 20 20 20 20 20 |immenu$ |=""     |
|00000910| 20 20 20 20 3a f4 20 53 | 65 74 20 62 79 20 74 68 |    :. S|et by th|
|00000920| 65 20 6d 65 6e 75 5f 78 | 78 78 78 20 72 6f 75 74 |e menu_x|xxx rout|
|00000930| 69 6e 65 73 0d 00 aa 3f | 63 6c 61 69 6d 64 72 61 |ines...?|claimdra|
|00000940| 67 24 20 3d 22 22 20 20 | 20 20 20 20 20 20 20 3a |g$ =""  |       :|
|00000950| f4 20 53 65 74 20 62 79 | 20 74 68 65 20 75 73 65 |. Set by| the use|
|00000960| 72 64 72 61 67 5f 78 78 | 78 78 20 72 6f 75 74 69 |rdrag_xx|xx routi|
|00000970| 6e 65 73 0d 00 b4 16 63 | 6c 6f 73 65 64 6f 77 6e |nes....c|losedown|
|00000980| 20 20 20 20 20 20 20 3d | a3 0d 00 be 16 6f 70 65 |       =|.....ope|
|00000990| 6e 25 20 20 20 20 20 20 | 20 20 20 20 20 3d a3 0d |n%      |     =..|
|000009a0| 00 c8 16 63 68 61 6e 67 | 65 64 25 20 20 20 20 20 |...chang|ed%     |
|000009b0| 20 20 20 3d b9 0d 00 d2 | 10 78 73 63 61 6c 65 3d |   =....|.xscale=|
|000009c0| 36 3a 54 3d 30 0d 00 dc | 0c 79 73 63 61 6c 65 3d |6:T=0...|.yscale=|
|000009d0| 33 0d 00 e6 1b 6f 72 62 | 69 74 25 3d b9 3a 73 75 |3....orb|it%=.:su|
|000009e0| 6e 25 3d b9 3a 64 72 61 | 77 25 3d b9 0d 00 f0 1f |n%=.:dra|w%=.....|
|000009f0| 71 3d 30 3a 64 61 79 73 | 3d 39 39 39 39 3a 4f 4c |q=0:days|=9999:OL|
|00000a00| 44 58 3d 30 3a 4f 4c 44 | 59 3d 30 0d 00 fa 42 de |DX=0:OLD|Y=0...B.|
|00000a10| 20 74 65 78 74 24 28 35 | 30 29 2c 73 65 74 74 69 | text$(5|0),setti|
|00000a20| 6e 67 28 35 30 29 2c 66 | 6c 61 67 73 28 35 30 29 |ng(50),f|lags(50)|
|00000a30| 20 3a f4 20 75 73 65 64 | 20 62 79 20 74 68 65 20 | :. used| by the |
|00000a40| 6d 65 6e 75 20 72 6f 75 | 74 69 6e 65 73 0d 01 04 |menu rou|tines...|
|00000a50| 42 de 20 73 75 62 6d 65 | 6e 75 28 35 30 29 2c 72 |B. subme|nu(50),r|
|00000a60| 65 66 28 35 30 29 2c 6d | 65 6e 75 70 6f 73 28 32 |ef(50),m|enupos(2|
|00000a70| 30 29 20 3a f4 20 75 73 | 65 64 20 62 79 20 74 68 |0) :. us|ed by th|
|00000a80| 65 20 6d 65 6e 75 20 72 | 6f 75 74 69 6e 65 73 0d |e menu r|outines.|
|00000a90| 01 0e 0f de 20 6d 65 6e | 75 25 20 35 31 32 0d 01 |.... men|u% 512..|
|00000aa0| 18 15 de 20 69 6e 64 69 | 72 65 63 74 25 20 26 32 |... indi|rect% &2|
|00000ab0| 30 30 30 0d 01 22 12 de | 20 6d 73 67 62 6c 6b 25 |000.."..| msgblk%|
|00000ac0| 20 32 35 36 3a 0d 01 2c | 1e de 20 72 61 64 28 31 | 256:..,|.. rad(1|
|00000ad0| 30 29 2c 74 69 6d 65 28 | 31 30 29 2c 61 6e 67 28 |0),time(|10),ang(|
|00000ae0| 31 30 29 0d 01 36 08 64 | 61 3d 34 0d 01 40 25 69 |10)..6.d|a=4..@%i|
|00000af0| 70 74 72 25 3d 69 6e 64 | 69 72 65 63 74 25 3a 69 |ptr%=ind|irect%:i|
|00000b00| 65 6e 64 25 3d 69 70 74 | 72 25 2b 26 32 30 30 30 |end%=ipt|r%+&2000|
|00000b10| 0d 01 4a 1a de 20 66 64 | 61 74 65 25 20 35 2c 66 |..J.. fd|ate% 5,f|
|00000b20| 62 75 66 66 65 72 25 20 | 32 38 0d 01 54 30 f2 6f |buffer% |28..T0.o|
|00000b30| 70 65 6e 74 65 6d 70 6c | 61 74 65 66 69 6c 65 28 |pentempl|atefile(|
|00000b40| 22 3c 53 53 79 73 74 65 | 6d 24 44 69 72 3e 2e 54 |"<SSyste|m$Dir>.T|
|00000b50| 65 6d 70 6c 61 74 65 73 | 22 29 0d 01 5e 1d f2 6c |emplates|")..^..l|
|00000b60| 6f 61 64 74 65 6d 70 6c | 61 74 65 28 22 70 72 6f |oadtempl|ate("pro|
|00000b70| 67 49 6e 66 6f 22 29 0d | 01 68 26 c8 99 20 22 57 |gInfo").|.h&.. "W|
|00000b80| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000b90| 22 2c 2c 71 25 20 b8 20 | 69 6e 66 6f 25 0d 01 72 |",,q% . |info%..r|
|00000ba0| 1a f2 6c 6f 61 64 74 65 | 6d 70 6c 61 74 65 28 22 |..loadte|mplate("|
|00000bb0| 6d 61 69 6e 77 22 29 0d | 01 7c 0d 71 25 21 36 34 |mainw").|.|.q%!64|
|00000bc0| 3d 73 70 31 0d 01 86 27 | c8 99 20 22 57 69 6d 70 |=sp1...'|.. "Wimp|
|00000bd0| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00000be0| 71 25 20 b8 20 6d 61 69 | 6e 77 25 0d 01 90 19 f2 |q% . mai|nw%.....|
|00000bf0| 6c 6f 61 64 74 65 6d 70 | 6c 61 74 65 28 22 77 6f |loadtemp|late("wo|
|00000c00| 72 6b 22 29 0d 01 9a 26 | c8 99 20 22 57 69 6d 70 |rk")...&|.. "Wimp|
|00000c10| 5f 43 72 65 61 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_CreateW|indow",,|
|00000c20| 71 25 20 b8 20 77 6f 72 | 6b 25 0d 01 a4 16 f2 63 |q% . wor|k%.....c|
|00000c30| 6c 6f 73 65 74 65 6d 70 | 6c 61 74 65 66 69 6c 65 |losetemp|latefile|
|00000c40| 0d 01 ae 28 f2 69 63 6f | 6e 5f 70 75 74 64 61 74 |...(.ico|n_putdat|
|00000c50| 61 28 71 25 2c 69 6e 66 | 6f 25 2c 34 2c 76 65 72 |a(q%,inf|o%,4,ver|
|00000c60| 73 69 6f 6e 24 2c 30 29 | 0d 01 b8 16 65 72 72 6f |sion$,0)|....erro|
|00000c70| 72 5f 66 6c 61 67 25 20 | 20 20 20 20 3d 33 0d 01 |r_flag% |    =3..|
|00000c80| c2 11 f2 6e 65 77 76 61 | 6c 73 3a f2 72 61 64 0d |...newva|ls:.rad.|
|00000c90| 01 cc 11 f2 52 65 61 64 | 4d 6f 64 65 56 61 72 73 |....Read|ModeVars|
|00000ca0| 0d 01 d6 0e ee 20 85 20 | f2 65 72 72 6f 72 0d 01 |..... . |.error..|
|00000cb0| e0 16 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |.... "Ho|urglass_|
|00000cc0| 4f 66 66 22 0d 01 ea 05 | f5 0d 01 f4 17 20 20 f2 |Off"....|.....  .|
|00000cd0| 61 63 74 69 6f 6e 28 a4 | 70 6f 6c 6c 28 30 29 29 |action(.|poll(0))|
|00000ce0| 0d 01 fe 0f fd 20 63 6c | 6f 73 65 64 6f 77 6e 0d |..... cl|osedown.|
|00000cf0| 02 08 0e 24 71 25 3d 22 | 54 41 53 4b 22 0d 02 12 |...$q%="|TASK"...|
|00000d00| 22 c8 99 20 22 57 69 6d | 70 5f 43 6c 6f 73 65 44 |".. "Wim|p_CloseD|
|00000d10| 6f 77 6e 22 2c 74 61 73 | 6b 25 2c 71 25 21 30 0d |own",tas|k%,q%!0.|
|00000d20| 02 1c 05 e0 0d 02 26 0b | dd f2 65 72 72 6f 72 0d |......&.|..error.|
|00000d30| 02 30 15 e7 20 65 72 72 | 6f 72 5f 66 6c 61 67 25 |.0.. err|or_flag%|
|00000d40| 3d 33 20 8c 0d 02 3a 4b | 20 20 f2 65 72 72 6f 72 |=3 ...:K|  .error|
|00000d50| 62 6f 78 28 22 55 6e 65 | 78 70 65 63 74 65 64 20 |box("Une|xpected |
|00000d60| 65 72 72 6f 72 3a 2d 20 | 22 2b f6 24 2b 22 20 49 |error:- |"+.$+" I|
|00000d70| 6e 74 65 72 6e 61 6c 20 | 65 72 72 6f 72 20 63 6f |nternal |error co|
|00000d80| 64 65 20 22 2b c3 9e 29 | 3a f1 46 49 4c 45 24 0d |de "+..)|:.FILE$.|
|00000d90| 02 44 05 cc 0d 02 4e 13 | 20 20 f2 65 72 72 6f 72 |.D....N.|  .error|
|00000da0| 62 6f 78 28 f6 24 29 0d | 02 58 05 cd 0d 02 62 11 |box(.$).|.X....b.|
|00000db0| 65 72 72 6f 72 5f 66 6c | 61 67 25 3d 33 0d 02 6c |error_fl|ag%=3..l|
|00000dc0| 18 c8 99 20 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |... "Hou|rglass_S|
|00000dd0| 6d 61 73 68 22 0d 02 76 | 05 e1 0d 02 80 0c dd f2 |mash"..v|........|
|00000de0| 6f 6b 28 65 24 29 0d 02 | 8a 11 65 72 72 6f 72 5f |ok(e$)..|..error_|
|00000df0| 66 6c 61 67 25 3d 31 0d | 02 94 0a 85 20 31 2c 65 |flag%=1.|.... 1,e|
|00000e00| 24 0d 02 9e 05 e1 0d 02 | a8 12 dd f2 65 72 72 6f |$.......|....erro|
|00000e10| 72 62 6f 78 28 72 24 29 | 0d 02 b2 08 ea 20 72 25 |rbox(r$)|..... r%|
|00000e20| 0d 02 bc 19 21 71 25 3d | 9f 3a 24 28 71 25 2b 34 |....!q%=|.:$(q%+4|
|00000e30| 29 3d 72 24 2b bd 28 30 | 29 0d 02 c6 37 c8 99 20 |)=r$+.(0|)...7.. |
|00000e40| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00000e50| 72 22 2c 71 25 2c 65 72 | 72 6f 72 5f 66 6c 61 67 |r",q%,er|ror_flag|
|00000e60| 25 2c 22 53 53 79 73 74 | 65 6d 22 20 b8 20 72 25 |%,"SSyst|em" . r%|
|00000e70| 0d 02 d0 18 e7 20 72 25 | 3d 32 20 8c 20 63 6c 6f |..... r%|=2 . clo|
|00000e80| 73 65 64 6f 77 6e 3d b9 | 0d 02 da 05 e1 0d 02 e4 |sedown=.|........|
|00000e90| 3c dd f2 63 6c 69 63 6b | 77 69 6e 64 6f 77 28 6d |<..click|window(m|
|00000ea0| 6f 75 73 65 78 25 2c 6d | 6f 75 73 65 79 25 2c 62 |ousex%,m|ousey%,b|
|00000eb0| 75 74 74 6f 6e 25 2c 68 | 61 6e 64 6c 65 25 2c 69 |utton%,h|andle%,i|
|00000ec0| 63 6f 6e 25 2c 6f 62 25 | 29 0d 02 ee 10 c8 8e 20 |con%,ob%|)...... |
|00000ed0| 68 61 6e 64 6c 65 25 20 | ca 0d 02 f8 2c 20 20 c9 |handle% |....,  .|
|00000ee0| 20 6d 61 69 6e 77 25 20 | 20 20 3a f2 63 6c 69 63 | mainw% |  :.clic|
|00000ef0| 6b 6d 61 69 6e 77 28 62 | 75 74 74 6f 6e 25 2c 69 |kmainw(b|utton%,i|
|00000f00| 63 6f 6e 25 29 0d 03 02 | 2b 20 20 c9 20 77 6f 72 |con%)...|+  . wor|
|00000f10| 6b 25 20 20 20 20 3a f2 | 63 6c 69 63 6b 77 6f 72 |k%    :.|clickwor|
|00000f20| 6b 28 62 75 74 74 6f 6e | 25 2c 69 63 6f 6e 25 29 |k(button|%,icon%)|
|00000f30| 0d 03 0c 2e 20 20 c9 20 | 2d 32 20 20 20 20 20 20 |....  . |-2      |
|00000f40| 20 3a f2 63 6c 69 63 6b | 69 63 6f 6e 62 61 72 28 | :.click|iconbar(|
|00000f50| 62 75 74 74 6f 6e 25 2c | 69 63 6f 6e 25 29 0d 03 |button%,|icon%)..|
|00000f60| 16 05 cb 0d 03 20 05 e1 | 0d 03 2a 05 3a 0d 03 34 |..... ..|..*.:..4|
|00000f70| 21 dd f2 63 6c 69 63 6b | 69 63 6f 6e 62 61 72 28 |!..click|iconbar(|
|00000f80| 62 75 74 74 6f 6e 25 2c | 69 63 6f 6e 25 29 0d 03 |button%,|icon%)..|
|00000f90| 3e 11 e7 20 69 63 6f 6e | 25 3c 30 20 8c 20 e1 0d |>.. icon|%<0 . ..|
|00000fa0| 03 48 0a c8 8e 20 b9 20 | ca 0d 03 52 11 20 20 c9 |.H... . |...R.  .|
|00000fb0| 20 62 75 74 74 6f 6e 25 | 3d 32 0d 03 5c 20 20 20 | button%|=2..\   |
|00000fc0| 20 20 f4 20 6f 70 65 6e | 73 20 74 68 65 20 69 63 |  . open|s the ic|
|00000fd0| 6f 6e 62 61 72 20 6d 65 | 6e 75 0d 03 66 17 20 20 |onbar me|nu..f.  |
|00000fe0| 20 20 e7 20 69 63 6f 6e | 25 3d 73 69 63 6f 6e 20 |  . icon|%=sicon |
|00000ff0| 8c 0d 03 70 15 20 20 20 | 20 20 20 f2 6d 65 6e 75 |...p.   |   .menu|
|00001000| 5f 73 69 63 6f 6e 0d 03 | 7a 09 20 20 20 20 cd 0d |_sicon..|z.    ..|
|00001010| 03 84 11 20 20 c9 20 62 | 75 74 74 6f 6e 25 3d 34 |...  . b|utton%=4|
|00001020| 0d 03 8e 1d 20 f2 6f 70 | 65 6e 77 69 6e 64 6f 77 |.... .op|enwindow|
|00001030| 28 6d 61 69 6e 77 25 2c | a3 2c 2d 31 29 0d 03 98 |(mainw%,|.,-1)...|
|00001040| 05 cb 0d 03 a2 05 e1 0d | 03 ac 05 3a 0d 03 b6 1f |........|...:....|
|00001050| dd f2 63 6c 69 63 6b 6d | 61 69 6e 77 28 62 75 74 |..clickm|ainw(but|
|00001060| 74 6f 6e 25 2c 69 63 6f | 6e 25 29 0d 03 c0 0a c8 |ton%,ico|n%).....|
|00001070| 8e 20 b9 20 ca 0d 03 ca | 10 20 c9 20 62 75 74 74 |. . ....|. . butt|
|00001080| 6f 6e 25 3d 32 0d 03 d4 | 10 20 f2 6d 65 6e 75 5f |on%=2...|. .menu_|
|00001090| 6d 61 69 6e 77 0d 03 de | 05 cb 0d 03 e8 05 e1 0d |mainw...|........|
|000010a0| 03 f2 05 3a 0d 03 fc 18 | dd f2 64 6f 5f 62 61 63 |...:....|..do_bac|
|000010b0| 6b 67 72 6f 75 6e 64 5f | 74 61 73 6b 0d 04 06 24 |kground_|task...$|
|000010c0| f2 72 65 64 72 61 77 77 | 69 6e 64 6f 77 28 6d 61 |.redraww|indow(ma|
|000010d0| 69 6e 77 25 29 3a 63 68 | 61 6e 67 65 64 25 3d a3 |inw%):ch|anged%=.|
|000010e0| 0d 04 10 05 e1 0d 04 1a | 05 3a 0d 04 24 1b dd f2 |........|.:..$...|
|000010f0| 72 65 64 72 61 77 77 69 | 6e 64 6f 77 28 68 61 6e |redrawwi|ndow(han|
|00001100| 64 6c 65 25 29 0d 04 2e | 0b ea 20 76 6f 69 64 25 |dle%)...|.. void%|
|00001110| 0d 04 38 35 71 25 21 30 | 3d 68 61 6e 64 6c 65 25 |..85q%!0|=handle%|
|00001120| 3a 71 25 21 34 3d 30 3a | 71 25 21 38 3d 2d 39 35 |:q%!4=0:|q%!8=-95|
|00001130| 30 3a 71 25 21 31 32 3d | 31 32 33 36 3a 71 25 21 |0:q%!12=|1236:q%!|
|00001140| 31 36 3d 2d 35 0d 04 42 | 27 c8 99 20 22 57 69 6d |16=-5..B|'.. "Wim|
|00001150| 70 5f 55 70 64 61 74 65 | 57 69 6e 64 6f 77 22 2c |p_Update|Window",|
|00001160| 30 2c 71 25 20 b8 20 6d | 6f 72 65 25 0d 04 4c 1c |0,q% . m|ore%..L.|
|00001170| f2 6c 77 61 6f 72 69 67 | 69 6e 28 71 25 2b 34 2c |.lwaorig|in(q%+4,|
|00001180| 78 30 25 2c 79 30 25 29 | 0d 04 56 0c c8 95 20 6d |x0%,y0%)|..V... m|
|00001190| 6f 72 65 25 0d 04 60 09 | f2 70 6c 6f 74 0d 04 6a |ore%..`.|.plot..j|
|000011a0| 09 f2 6d 6f 76 65 0d 04 | 74 0e 20 20 f2 6e 65 77 |..move..|t.  .new|
|000011b0| 76 61 6c 73 0d 04 7e 29 | 20 20 c8 99 20 22 57 69 |vals..~)|  .. "Wi|
|000011c0| 6d 70 5f 47 65 74 52 65 | 63 74 61 6e 67 6c 65 22 |mp_GetRe|ctangle"|
|000011d0| 2c 30 2c 71 25 20 b8 20 | 6d 6f 72 65 25 0d 04 88 |,0,q% . |more%...|
|000011e0| 05 ce 0d 04 92 05 e1 0d | 04 9c 05 3a 0d 04 a6 19 |........|...:....|
|000011f0| dd a4 6f 6b 74 6f 63 6c | 6f 73 65 77 28 68 61 6e |..oktocl|osew(han|
|00001200| 64 6c 65 25 29 0d 04 b0 | 0f ea 20 73 68 75 74 74 |dle%)...|.. shutt|
|00001210| 69 6e 67 25 0d 04 ba 0f | 73 68 75 74 74 69 6e 67 |ing%....|shutting|
|00001220| 25 3d b9 0d 04 c4 0e 3d | 73 68 75 74 74 69 6e 67 |%=.....=|shutting|
|00001230| 25 0d 04 ce 05 3a 0d 04 | d8 0e dd f2 6b 65 79 70 |%....:..|....keyp|
|00001240| 72 65 73 73 0d 04 e2 09 | ea 20 69 63 25 0d 04 ec |ress....|. ic%...|
|00001250| 10 e7 20 71 25 21 34 3c | 3e 2d 31 20 8c 0d 04 f6 |.. q%!4<|>-1 ....|
|00001260| 29 20 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 43 |)  .. "W|imp_GetC|
|00001270| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 2c 6d |aretPosi|tion",,m|
|00001280| 73 67 62 6c 6b 25 0d 05 | 00 13 20 20 69 63 25 3d |sgblk%..|..  ic%=|
|00001290| 6d 73 67 62 6c 6b 25 21 | 34 0d 05 0a 10 20 20 c8 |msgblk%!|4....  .|
|000012a0| 8e 20 71 25 21 32 34 20 | ca 0d 05 14 27 20 20 20 |. q%!24 |....'   |
|000012b0| 20 c9 20 32 37 20 8c 20 | c8 99 20 22 57 69 6d 70 | . 27 . |.. "Wimp|
|000012c0| 5f 43 72 65 61 74 65 4d | 65 6e 75 22 2c 2c 2d 31 |_CreateM|enu",,-1|
|000012d0| 0d 05 1e 07 20 20 7f 0d | 05 28 10 20 20 20 c8 8e |....  ..|.(.   ..|
|000012e0| 20 71 25 21 30 20 ca 0d | 05 32 2d 20 20 20 20 c9 | q%!0 ..|.2-    .|
|000012f0| 20 6d 61 69 6e 77 25 20 | 20 3a f2 6b 65 79 70 72 | mainw% | :.keypr|
|00001300| 65 73 73 5f 6d 61 69 6e | 77 28 69 63 25 2c 71 25 |ess_main|w(ic%,q%|
|00001310| 21 32 34 29 0d 05 3c 09 | 20 20 20 20 cb 0d 05 46 |!24)..<.|    ...F|
|00001320| 07 20 20 cb 0d 05 50 05 | cd 0d 05 5a 05 e1 0d 05 |.  ...P.|...Z....|
|00001330| 64 05 3a 0d 05 6e 16 dd | a4 6d 65 6e 75 73 65 6c |d.:..n..|.menusel|
|00001340| 65 63 74 5f 73 69 63 6f | 6e 0d 05 78 14 ea 20 6c |ect_sico|n..x.. l|
|00001350| 65 76 65 6c 30 2c 62 75 | 74 74 6f 6e 25 0d 05 82 |evel0,bu|tton%...|
|00001360| 0f 6c 65 76 65 6c 30 3d | 71 25 21 30 0d 05 8c 20 |.level0=|q%!0... |
|00001370| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 50 6f 69 6e |.. "Wimp|_GetPoin|
|00001380| 74 65 72 49 6e 66 6f 22 | 2c 2c 71 25 0d 05 96 10 |terInfo"|,,q%....|
|00001390| 62 75 74 74 6f 6e 25 3d | 71 25 21 38 0d 05 a0 0f |button%=|q%!8....|
|000013a0| c8 8e 20 6c 65 76 65 6c | 30 20 ca 0d 05 aa 09 20 |.. level|0 ..... |
|000013b0| 20 c9 20 30 0d 05 b4 09 | 20 20 c9 20 31 0d 05 be | . 0....|  . 1...|
|000013c0| 13 20 20 63 6c 6f 73 65 | 64 6f 77 6e 20 3d 20 b9 |.  close|down = .|
|000013d0| 0d 05 c8 05 cb 0d 05 d2 | 06 3d 30 0d 05 dc 05 3a |........|.=0....:|
|000013e0| 0d 05 e6 16 dd a4 6d 65 | 6e 75 73 65 6c 65 63 74 |......me|nuselect|
|000013f0| 5f 6d 61 69 6e 77 0d 05 | f0 1b ea 20 6c 65 76 65 |_mainw..|... leve|
|00001400| 6c 30 2c 6c 65 76 65 6c | 31 2c 62 75 74 74 6f 6e |l0,level|1,button|
|00001410| 25 0d 05 fa 0f 6c 65 76 | 65 6c 30 3d 71 25 21 30 |%....lev|el0=q%!0|
|00001420| 0d 06 04 0f 6c 65 76 65 | 6c 31 3d 71 25 21 34 0d |....leve|l1=q%!4.|
|00001430| 06 0e 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 50 |.. .. "W|imp_GetP|
|00001440| 6f 69 6e 74 65 72 49 6e | 66 6f 22 2c 2c 71 25 0d |ointerIn|fo",,q%.|
|00001450| 06 18 10 62 75 74 74 6f | 6e 25 3d 71 25 21 38 0d |...butto|n%=q%!8.|
|00001460| 06 22 0f c8 8e 20 6c 65 | 76 65 6c 30 20 ca 0d 06 |."... le|vel0 ...|
|00001470| 2c 09 20 20 c9 20 30 0d | 06 36 09 20 20 c9 20 31 |,.  . 0.|.6.  . 1|
|00001480| 0d 06 40 52 20 20 c9 20 | 32 20 3a e7 20 64 72 61 |..@R  . |2 :. dra|
|00001490| 77 25 3d b9 20 64 72 61 | 77 25 3d a3 3a 6f 72 62 |w%=. dra|w%=.:orb|
|000014a0| 69 74 25 3d b9 3a 73 75 | 6e 25 3d b9 3a f2 70 6c |it%=.:su|n%=.:.pl|
|000014b0| 6f 74 20 8b 20 64 72 61 | 77 25 3d b9 3a 6f 72 62 |ot . dra|w%=.:orb|
|000014c0| 69 74 25 3d b9 3a 73 75 | 6e 25 3d b9 3a f2 70 6c |it%=.:su|n%=.:.pl|
|000014d0| 6f 74 0d 06 4a 09 20 20 | c9 20 33 0d 06 54 10 20 |ot..J.  |. 3..T. |
|000014e0| 63 6c 6f 73 65 64 6f 77 | 6e 3d b9 0d 06 5e 05 cb |closedow|n=...^..|
|000014f0| 0d 06 68 06 3d 30 0d 06 | 72 05 3a 0d 06 7c 10 dd |..h.=0..|r.:..|..|
|00001500| f2 6d 65 6e 75 5f 6d 61 | 69 6e 77 0d 06 86 08 ea |.menu_ma|inw.....|
|00001510| 20 6e 6f 0d 06 90 11 6e | 6f 3d 30 3a c8 97 20 78 | no....n|o=0:.. x|
|00001520| 2c 79 2c 62 0d 06 9a 3d | f2 64 65 66 69 6e 65 5f |,y,b...=|.define_|
|00001530| 6d 65 6e 75 5f 74 65 78 | 74 28 22 49 6e 66 6f 22 |menu_tex|t("Info"|
|00001540| 2c 6e 6f 2c 30 2c 30 2c | 30 2c 30 2c 26 31 30 30 |,no,0,0,|0,0,&100|
|00001550| 32 31 2c 69 6e 66 6f 25 | 2c 30 29 3a 6e 6f 2b 3d |21,info%|,0):no+=|
|00001560| 31 0d 06 a4 43 f2 64 65 | 66 69 6e 65 5f 6d 65 6e |1...C.de|fine_men|
|00001570| 75 5f 74 65 78 74 28 22 | 50 61 72 61 6d 65 74 65 |u_text("|Paramete|
|00001580| 72 73 22 2c 6e 6f 2c 30 | 2c 30 2c 30 2c 30 2c 26 |rs",no,0|,0,0,0,&|
|00001590| 31 30 30 32 31 2c 77 6f | 72 6b 25 2c 30 29 3a 6e |10021,wo|rk%,0):n|
|000015a0| 6f 2b 3d 31 0d 06 ae 3f | f2 64 65 66 69 6e 65 5f |o+=1...?|.define_|
|000015b0| 6d 65 6e 75 5f 74 65 78 | 74 28 22 4f 72 62 69 74 |menu_tex|t("Orbit|
|000015c0| 73 22 2c 6e 6f 2c 30 2c | 64 72 61 77 25 2c 30 2c |s",no,0,|draw%,0,|
|000015d0| 30 2c 26 31 30 30 32 31 | 2c 30 2c 30 29 3a 6e 6f |0,&10021|,0,0):no|
|000015e0| 2b 3d 31 0d 06 b8 3a f2 | 64 65 66 69 6e 65 5f 6d |+=1...:.|define_m|
|000015f0| 65 6e 75 5f 74 65 78 74 | 28 22 51 75 69 74 22 2c |enu_text|("Quit",|
|00001600| 6e 6f 2c 30 2c 30 2c 30 | 2c 30 2c 26 31 30 30 32 |no,0,0,0|,0,&1002|
|00001610| 31 2c 30 2c 2d 31 29 3a | 6e 6f 2b 3d 31 0d 06 c2 |1,0,-1):|no+=1...|
|00001620| 29 f2 63 72 65 61 74 65 | 5f 6d 65 6e 75 28 22 53 |).create|_menu("S|
|00001630| 53 79 73 74 65 6d 22 2c | 6e 6f 2c 32 31 30 2c 78 |System",|no,210,x|
|00001640| 2d 36 34 2c 79 29 0d 06 | cc 0e 6d 65 6e 75 5f 6e |-64,y)..|..menu_n|
|00001650| 72 25 3d 30 0d 06 d6 16 | 63 6c 61 69 6d 6d 65 6e |r%=0....|claimmen|
|00001660| 75 24 3d 22 6d 61 69 6e | 77 22 0d 06 e0 05 e1 0d |u$="main|w"......|
|00001670| 06 ea 05 3a 0d 06 f4 10 | dd f2 6d 65 6e 75 5f 73 |...:....|..menu_s|
|00001680| 69 63 6f 6e 0d 06 fe 11 | 6e 6f 3d 30 3a c8 97 20 |icon....|no=0:.. |
|00001690| 78 2c 79 2c 62 0d 07 08 | 3d f2 64 65 66 69 6e 65 |x,y,b...|=.define|
|000016a0| 5f 6d 65 6e 75 5f 74 65 | 78 74 28 22 49 6e 66 6f |_menu_te|xt("Info|
|000016b0| 22 2c 6e 6f 2c 30 2c 30 | 2c 30 2c 30 2c 26 31 30 |",no,0,0|,0,0,&10|
|000016c0| 30 32 31 2c 69 6e 66 6f | 25 2c 30 29 3a 6e 6f 2b |021,info|%,0):no+|
|000016d0| 3d 31 0d 07 12 3a f2 64 | 65 66 69 6e 65 5f 6d 65 |=1...:.d|efine_me|
|000016e0| 6e 75 5f 74 65 78 74 28 | 22 51 75 69 74 22 2c 6e |nu_text(|"Quit",n|
|000016f0| 6f 2c 30 2c 30 2c 30 2c | 30 2c 26 31 30 30 32 31 |o,0,0,0,|0,&10021|
|00001700| 2c 30 2c 2d 31 29 3a 6e | 6f 2b 3d 31 0d 07 1c 32 |,0,-1):n|o+=1...2|
|00001710| f2 63 72 65 61 74 65 5f | 6d 65 6e 75 28 22 53 53 |.create_|menu("SS|
|00001720| 79 73 74 65 6d 22 2c 6e | 6f 2c 32 31 30 2c 78 2d |ystem",n|o,210,x-|
|00001730| 36 34 2c 39 36 2b 28 6e | 6f 2a 34 30 29 29 0d 07 |64,96+(n|o*40))..|
|00001740| 26 0e 6d 65 6e 75 5f 6e | 72 25 3d 30 0d 07 30 15 |&.menu_n|r%=0..0.|
|00001750| 63 6c 61 69 6d 6d 65 6e | 75 24 3d 22 78 66 65 72 |claimmen|u$="xfer|
|00001760| 22 0d 07 3a 05 e1 0d 07 | 44 05 3a 0d 07 4e 16 dd |"..:....|D.:..N..|
|00001770| f2 77 68 69 63 68 6d 65 | 6e 75 28 6d 65 6e 75 24 |.whichme|nu(menu$|
|00001780| 29 0d 07 58 0b ea 20 76 | 6f 69 64 25 0d 07 62 0e |)..X.. v|oid%..b.|
|00001790| c8 8e 20 6d 65 6e 75 24 | 20 ca 0d 07 6c 28 20 20 |.. menu$| ...l(  |
|000017a0| c9 20 22 6d 61 69 6e 77 | 22 20 3a 76 6f 69 64 25 |. "mainw|" :void%|
|000017b0| 3d a4 6d 65 6e 75 73 65 | 6c 65 63 74 5f 6d 61 69 |=.menuse|lect_mai|
|000017c0| 6e 77 0d 07 76 27 20 20 | c9 20 22 78 66 65 72 22 |nw..v'  |. "xfer"|
|000017d0| 20 3a 76 6f 69 64 25 3d | a4 6d 65 6e 75 73 65 6c | :void%=|.menusel|
|000017e0| 65 63 74 5f 73 69 63 6f | 6e 0d 07 80 05 cb 0d 07 |ect_sico|n.......|
|000017f0| 8a 05 e1 0d 07 94 05 3a | 0d 07 9e 12 dd f2 66 69 |.......:|......fi|
|00001800| 6c 65 5f 63 68 61 6e 67 | 65 64 0d 07 a8 05 e1 0d |le_chang|ed......|
|00001810| 07 b2 26 dd f2 6f 70 65 | 6e 77 69 6e 64 6f 77 28 |..&..ope|nwindow(|
|00001820| 68 61 6e 64 6c 65 25 2c | 66 75 6c 6c 25 2c 66 72 |handle%,|full%,fr|
|00001830| 6f 6e 74 25 29 0d 07 bc | 10 71 25 21 30 3d 68 61 |ont%)...|.q%!0=ha|
|00001840| 6e 64 6c 65 25 0d 07 c6 | 2d e7 20 ac 20 66 75 6c |ndle%...|-. . ful|
|00001850| 6c 25 20 8c 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |l% . .. |"Wimp_Ge|
|00001860| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 30 2c |tWindowS|tate",0,|
|00001870| 71 25 0d 07 d0 17 e7 20 | 66 72 6f 6e 74 25 20 8c |q%..... |front% .|
|00001880| 20 71 25 21 32 38 3d 2d | 31 0d 07 da 1d c8 99 20 | q%!28=-|1...... |
|00001890| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|000018a0| 22 2c 30 2c 71 25 0d 07 | e4 05 e1 0d 07 ee 05 3a |",0,q%..|.......:|
|000018b0| 0d 07 f8 1a dd f2 63 6c | 6f 73 65 77 69 6e 64 6f |......cl|osewindo|
|000018c0| 77 28 68 61 6e 64 6c 65 | 25 29 0d 08 02 1c e7 20 |w(handle|%)..... |
|000018d0| a4 6f 6b 74 6f 63 6c 6f | 73 65 77 28 68 61 6e 64 |.oktoclo|sew(hand|
|000018e0| 6c 65 25 29 20 8c 0d 08 | 0c 12 20 20 71 25 21 30 |le%) ...|..  q%!0|
|000018f0| 3d 68 61 6e 64 6c 65 25 | 0d 08 16 20 20 20 c8 99 |=handle%|...   ..|
|00001900| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00001910| 6f 77 22 2c 30 2c 71 25 | 0d 08 20 05 cd 0d 08 2a |ow",0,q%|.. ....*|
|00001920| 05 e1 0d 08 34 05 3a 0d | 08 3e 11 dd a4 70 6f 6c |....4.:.|.>...pol|
|00001930| 6c 28 6d 61 73 6b 25 29 | 0d 08 48 20 c8 99 20 22 |l(mask%)|..H .. "|
|00001940| 57 69 6d 70 5f 50 6f 6c | 6c 22 2c 6d 61 73 6b 25 |Wimp_Pol|l",mask%|
|00001950| 2c 71 25 20 b8 20 61 25 | 0d 08 52 07 3d 61 25 0d |,q% . a%|..R.=a%.|
|00001960| 08 5c 05 3a 0d 08 66 13 | dd f2 61 63 74 69 6f 6e |.\.:..f.|..action|
|00001970| 28 65 76 6e 74 25 29 0d | 08 70 0e c8 8e 20 65 76 |(evnt%).|.p... ev|
|00001980| 6e 74 25 20 ca 0d 08 7a | 1d 20 20 c9 20 30 3a f2 |nt% ...z|.  . 0:.|
|00001990| 64 6f 5f 62 61 63 6b 67 | 72 6f 75 6e 64 5f 74 61 |do_backg|round_ta|
|000019a0| 73 6b 0d 08 84 1d 20 20 | c9 20 31 3a f2 72 65 64 |sk....  |. 1:.red|
|000019b0| 72 61 77 77 69 6e 64 6f | 77 28 71 25 21 30 29 0d |rawwindo|w(q%!0).|
|000019c0| 08 8e 1f 20 20 c9 20 32 | 3a f2 6f 70 65 6e 77 69 |...  . 2|:.openwi|
|000019d0| 6e 64 6f 77 28 71 25 21 | 30 2c b9 2c 30 29 0d 08 |ndow(q%!|0,.,0)..|
|000019e0| 98 1c 20 20 c9 20 33 3a | f2 63 6c 6f 73 65 77 69 |..  . 3:|.closewi|
|000019f0| 6e 64 6f 77 28 71 25 21 | 30 29 0d 08 a2 0a 20 20 |ndow(q%!|0)....  |
|00001a00| c9 20 34 3a 0d 08 ac 0a | 20 20 c9 20 35 3a 0d 08 |. 4:....|  . 5:..|
|00001a10| b6 37 20 20 c9 20 36 3a | f2 63 6c 69 63 6b 77 69 |.7  . 6:|.clickwi|
|00001a20| 6e 64 6f 77 28 21 71 25 | 2c 71 25 21 34 2c 71 25 |ndow(!q%|,q%!4,q%|
|00001a30| 21 38 2c 71 25 21 31 32 | 2c 71 25 21 31 36 2c 71 |!8,q%!12|,q%!16,q|
|00001a40| 25 21 32 30 29 0d 08 c0 | 14 20 20 c9 20 37 3a 63 |%!20)...|.  . 7:c|
|00001a50| 68 61 6e 67 65 64 25 3d | b9 0d 08 ca 13 20 20 c9 |hanged%=|.....  .|
|00001a60| 20 38 3a f2 6b 65 79 70 | 72 65 73 73 0d 08 d4 33 | 8:.keyp|ress...3|
|00001a70| 20 20 c9 20 39 3a e7 20 | 63 6c 61 69 6d 6d 65 6e |  . 9:. |claimmen|
|00001a80| 75 24 3c 3e 22 22 20 8c | 20 f2 77 68 69 63 68 6d |u$<>"" .| .whichm|
|00001a90| 65 6e 75 28 63 6c 61 69 | 6d 6d 65 6e 75 24 29 0d |enu(clai|mmenu$).|
|00001aa0| 08 de 0e 20 20 c9 20 31 | 37 2c 31 38 3a 0d 08 e8 |...  . 1|7,18:...|
|00001ab0| 05 cb 0d 08 f2 05 e1 0d | 08 fc 05 3a 0d 09 06 11 |........|...:....|
|00001ac0| dd f2 72 65 63 65 69 76 | 65 28 71 25 29 0d 09 10 |..receiv|e(q%)...|
|00001ad0| 0e c8 8e 20 71 25 21 31 | 36 20 ca 0d 09 1a 37 c9 |... q%!1|6 ....7.|
|00001ae0| 20 30 20 20 20 20 3a 24 | 71 25 3d 22 54 41 53 4b | 0    :$|q%="TASK|
|00001af0| 22 3a c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |":.. "Wi|mp_Close|
|00001b00| 44 6f 77 6e 22 2c 74 61 | 73 6b 25 2c 71 25 21 30 |Down",ta|sk%,q%!0|
|00001b10| 3a e0 0d 09 24 05 cb 0d | 09 2e 05 e1 0d 09 38 05 |:...$...|......8.|
|00001b20| 3a 0d 09 42 1c dd f2 6c | 77 61 6f 72 69 67 69 6e |:..B...l|waorigin|
|00001b30| 28 62 2c f8 20 78 25 2c | f8 20 79 25 29 0d 09 4c |(b,. x%,|. y%)..L|
|00001b40| 1c 78 25 3d 62 21 30 2d | 62 21 31 36 3a 79 25 3d |.x%=b!0-|b!16:y%=|
|00001b50| 62 21 31 32 2d 62 21 32 | 30 0d 09 56 05 e1 0d 09 |b!12-b!2|0..V....|
|00001b60| 60 05 3a 0d 09 6a 48 dd | a4 69 63 6f 6e 5f 63 72 |`.:..jH.|.icon_cr|
|00001b70| 65 61 74 65 28 77 69 6e | 64 6f 77 25 2c 6d 69 6e |eate(win|dow%,min|
|00001b80| 78 25 2c 6d 69 6e 79 25 | 2c 77 69 64 74 68 25 2c |x%,miny%|,width%,|
|00001b90| 68 65 69 67 68 74 25 2c | 66 67 25 2c 62 67 25 2c |height%,|fg%,bg%,|
|00001ba0| 66 6c 67 25 2c 64 61 74 | 61 24 29 0d 09 74 08 ea |flg%,dat|a$)..t..|
|00001bb0| 20 69 25 0d 09 7e 10 71 | 25 21 30 3d 77 69 6e 64 | i%..~.q|%!0=wind|
|00001bc0| 6f 77 25 0d 09 88 19 71 | 25 21 34 3d 6d 69 6e 78 |ow%....q|%!4=minx|
|00001bd0| 25 3a 71 25 21 38 3d 6d | 69 6e 79 25 0d 09 92 2a |%:q%!8=m|iny%...*|
|00001be0| 71 25 21 31 32 3d 6d 69 | 6e 78 25 2b 77 69 64 74 |q%!12=mi|nx%+widt|
|00001bf0| 68 25 3a 71 25 21 31 36 | 3d 6d 69 6e 79 25 2b 68 |h%:q%!16|=miny%+h|
|00001c00| 65 69 67 68 74 25 0d 09 | 9c 22 71 25 21 32 30 3d |eight%..|."q%!20=|
|00001c10| 66 6c 67 25 20 84 20 62 | 67 25 3c 3c 32 38 20 84 |flg% . b|g%<<28 .|
|00001c20| 20 66 67 25 3c 3c 32 34 | 0d 09 a6 14 e7 20 71 25 | fg%<<24|..... q%|
|00001c30| 21 32 30 20 80 20 26 31 | 30 30 20 8c 0d 09 b0 14 |!20 . &1|00 .....|
|00001c40| 20 20 69 25 3d a7 64 61 | 74 61 24 2c 22 2c 22 29 |  i%=.da|ta$,",")|
|00001c50| 0d 09 ba 1b 20 20 71 25 | 21 32 34 3d a0 28 c0 64 |....  q%|!24=.(.d|
|00001c60| 61 74 61 24 2c 69 25 2d | 31 29 29 0d 09 c4 0e 20 |ata$,i%-|1)).... |
|00001c70| 20 71 25 21 32 38 3d 2d | 31 0d 09 ce 1b 20 20 71 | q%!28=-|1....  q|
|00001c80| 25 21 33 32 3d a0 28 c1 | 64 61 74 61 24 2c 69 25 |%!32=.(.|data$,i%|
|00001c90| 2b 31 29 29 0d 09 d8 05 | cc 0d 09 e2 17 24 28 71 |+1))....|.....$(q|
|00001ca0| 25 2b 32 34 29 3d c0 64 | 61 74 61 24 2c 31 31 29 |%+24)=.d|ata$,11)|
|00001cb0| 0d 09 ec 05 cd 0d 09 f6 | 22 c8 99 20 22 57 69 6d |........|".. "Wim|
|00001cc0| 70 5f 43 72 65 61 74 65 | 49 63 6f 6e 22 2c 30 2c |p_Create|Icon",0,|
|00001cd0| 71 25 20 b8 20 69 25 0d | 0a 00 07 3d 69 25 0d 0a |q% . i%.|...=i%..|
|00001ce0| 0a 05 3a 0d 0a 14 23 dd | f2 69 63 6f 6e 5f 64 65 |..:...#.|.icon_de|
|00001cf0| 73 65 6c 65 63 74 28 68 | 61 6e 64 6c 65 25 2c 69 |select(h|andle%,i|
|00001d00| 63 6f 6e 68 25 29 0d 0a | 1e 12 e7 20 69 63 6f 6e |conh%)..|... icon|
|00001d10| 68 25 3c 3e 2d 31 20 8c | 0d 0a 28 1e 20 20 71 25 |h%<>-1 .|..(.  q%|
|00001d20| 21 30 3d 68 61 6e 64 6c | 65 25 3a 71 25 21 34 3d |!0=handl|e%:q%!4=|
|00001d30| 69 63 6f 6e 68 25 0d 0a | 32 1b 20 20 71 25 21 38 |iconh%..|2.  q%!8|
|00001d40| 3d 26 32 30 30 30 30 30 | 3a 71 25 21 31 32 3d 26 |=&200000|:q%!12=&|
|00001d50| 30 0d 0a 3c 20 20 20 c8 | 99 20 22 57 69 6d 70 5f |0..<   .|. "Wimp_|
|00001d60| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 2c 71 |SetIconS|tate",,q|
|00001d70| 25 0d 0a 46 05 cd 0d 0a | 50 05 e1 0d 0a 5a 05 3a |%..F....|P....Z.:|
|00001d80| 0d 0a 64 26 dd f2 69 63 | 6f 6e 5f 70 75 74 64 61 |..d&..ic|on_putda|
|00001d90| 74 61 28 62 2c 77 68 25 | 2c 69 68 25 2c 74 65 78 |ta(b,wh%|,ih%,tex|
|00001da0| 74 24 2c 72 64 29 0d 0a | 6e 13 62 21 30 3d 77 68 |t$,rd)..|n.b!0=wh|
|00001db0| 25 3a 62 21 34 3d 69 68 | 25 0d 0a 78 1d c8 99 20 |%:b!4=ih|%..x... |
|00001dc0| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00001dd0| 74 65 22 2c 2c 62 0d 0a | 82 1b c8 99 20 22 57 69 |te",,b..|.... "Wi|
|00001de0| 6d 70 5f 44 65 6c 65 74 | 65 49 63 6f 6e 22 2c 2c |mp_Delet|eIcon",,|
|00001df0| 62 0d 0a 8c 1e 62 21 34 | 3d 77 68 25 3a 24 28 62 |b....b!4|=wh%:$(b|
|00001e00| 21 32 38 29 3d 74 65 78 | 74 24 3a 62 2b 3d 34 0d |!28)=tex|t$:b+=4.|
|00001e10| 0a 96 1b c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 |..... "W|imp_Crea|
|00001e20| 74 65 49 63 6f 6e 22 2c | 2c 62 0d 0a a0 36 e7 20 |teIcon",|,b...6. |
|00001e30| 72 64 20 8c 20 c8 99 20 | 22 57 69 6d 70 5f 46 6f |rd . .. |"Wimp_Fo|
|00001e40| 72 63 65 52 65 64 72 61 | 77 22 2c 62 21 30 2c 62 |rceRedra|w",b!0,b|
|00001e50| 21 34 2c 62 21 38 2c 62 | 21 31 32 2c 62 21 31 36 |!4,b!8,b|!12,b!16|
|00001e60| 0d 0a aa 08 62 2d 3d 34 | 0d 0a b4 05 e1 0d 0a be |....b-=4|........|
|00001e70| 05 3a 0d 0a c8 35 dd f2 | 69 63 6f 6e 5f 70 75 74 |.:...5..|icon_put|
|00001e80| 64 61 74 61 28 71 25 2c | 77 68 61 6e 64 6c 65 25 |data(q%,|whandle%|
|00001e90| 2c 69 68 61 6e 64 6c 65 | 25 2c 64 61 74 61 24 2c |,ihandle|%,data$,|
|00001ea0| 72 65 64 72 61 77 29 0d | 0a d2 11 71 25 21 30 3d |redraw).|...q%!0=|
|00001eb0| 77 68 61 6e 64 6c 65 25 | 0d 0a dc 11 71 25 21 34 |whandle%|....q%!4|
|00001ec0| 3d 69 68 61 6e 64 6c 65 | 25 0d 0a e6 1e c8 99 20 |=ihandle|%...... |
|00001ed0| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00001ee0| 74 65 22 2c 2c 71 25 0d | 0a f0 12 24 28 71 25 21 |te",,q%.|...$(q%!|
|00001ef0| 32 38 29 3d 64 61 74 61 | 24 0d 0a fa 0e e7 20 72 |28)=data|$..... r|
|00001f00| 65 64 72 61 77 20 8c 0d | 0b 04 3b 20 20 c8 99 20 |edraw ..|..;  .. |
|00001f10| 22 57 69 6d 70 5f 46 6f | 72 63 65 52 65 64 72 61 |"Wimp_Fo|rceRedra|
|00001f20| 77 22 2c 77 68 61 6e 64 | 6c 65 25 2c 71 25 21 38 |w",whand|le%,q%!8|
|00001f30| 2c 71 25 21 31 32 2c 71 | 25 21 31 36 2c 71 25 21 |,q%!12,q|%!16,q%!|
|00001f40| 32 30 0d 0b 0e 05 cd 0d | 0b 18 05 e1 0d 0b 22 05 |20......|......".|
|00001f50| 3a 0d 0b 2c 2d dd f2 69 | 63 6f 6e 5f 73 65 74 62 |:..,-..i|con_setb|
|00001f60| 67 63 6f 6c 6f 75 72 28 | 62 2c 77 68 61 6e 64 6c |gcolour(|b,whandl|
|00001f70| 65 25 2c 69 63 6f 6e 25 | 2c 63 6f 6c 25 29 0d 0b |e%,icon%|,col%)..|
|00001f80| 36 35 21 62 3d 77 68 61 | 6e 64 6c 65 25 3a 62 21 |65!b=wha|ndle%:b!|
|00001f90| 34 3d 69 63 6f 6e 25 3a | 62 21 38 3d 63 6f 6c 25 |4=icon%:|b!8=col%|
|00001fa0| 3c 3c 32 38 3a 62 21 31 | 32 3d 26 46 30 30 30 30 |<<28:b!1|2=&F0000|
|00001fb0| 30 30 30 0d 0b 40 1e c8 | 99 20 22 57 69 6d 70 5f |000..@..|. "Wimp_|
|00001fc0| 53 65 74 49 63 6f 6e 53 | 74 61 74 65 22 2c 30 2c |SetIconS|tate",0,|
|00001fd0| 62 0d 0b 4a 05 e1 0d 0b | 54 05 3a 0d 0b 5e 2d dd |b..J....|T.:..^-.|
|00001fe0| f2 69 63 6f 6e 5f 73 65 | 74 66 67 63 6f 6c 6f 75 |.icon_se|tfgcolou|
|00001ff0| 72 28 62 2c 77 68 61 6e | 64 6c 65 25 2c 69 63 6f |r(b,whan|dle%,ico|
|00002000| 6e 25 2c 63 6f 6c 25 29 | 0d 0b 68 35 21 62 3d 77 |n%,col%)|..h5!b=w|
|00002010| 68 61 6e 64 6c 65 25 3a | 62 21 34 3d 69 63 6f 6e |handle%:|b!4=icon|
|00002020| 25 3a 62 21 38 3d 63 6f | 6c 25 3c 3c 32 34 3a 62 |%:b!8=co|l%<<24:b|
|00002030| 21 31 32 3d 26 30 46 30 | 30 30 30 30 30 0d 0b 72 |!12=&0F0|00000..r|
|00002040| 1e c8 99 20 22 57 69 6d | 70 5f 53 65 74 49 63 6f |... "Wim|p_SetIco|
|00002050| 6e 53 74 61 74 65 22 2c | 30 2c 62 0d 0b 7c 05 e1 |nState",|0,b..|..|
|00002060| 0d 0b 86 05 3a 0d 0b 90 | 39 dd a4 69 63 6f 6e 5f |....:...|9..icon_|
|00002070| 6e 65 77 73 70 72 69 74 | 65 28 62 2c 77 68 61 6e |newsprit|e(b,whan|
|00002080| 64 6c 65 25 2c 69 68 61 | 6e 64 6c 65 25 2c 6e 65 |dle%,iha|ndle%,ne|
|00002090| 77 6e 61 6d 65 24 2c 72 | 65 64 72 61 77 29 0d 0b |wname$,r|edraw)..|
|000020a0| 9a 1d 62 21 30 3d 77 68 | 61 6e 64 6c 65 25 3a 62 |..b!0=wh|andle%:b|
|000020b0| 21 34 3d 69 68 61 6e 64 | 6c 65 25 0d 0b a4 1d c8 |!4=ihand|le%.....|
|000020c0| 99 20 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |. "Wimp_|GetIconS|
|000020d0| 74 61 74 65 22 2c 2c 62 | 0d 0b ae 1b c8 99 20 22 |tate",,b|...... "|
|000020e0| 57 69 6d 70 5f 44 65 6c | 65 74 65 49 63 6f 6e 22 |Wimp_Del|eteIcon"|
|000020f0| 2c 2c 62 0d 0b b8 43 62 | 21 34 3d 62 21 38 3a 62 |,,b...Cb|!4=b!8:b|
|00002100| 21 38 3d 62 21 31 32 3a | 62 21 31 32 3d 62 21 31 |!8=b!12:|b!12=b!1|
|00002110| 36 3a 62 21 31 36 3d 62 | 21 32 30 3a 62 21 32 30 |6:b!16=b|!20:b!20|
|00002120| 3d 62 21 32 34 3a 24 28 | 62 2b 32 34 29 3d 6e 65 |=b!24:$(|b+24)=ne|
|00002130| 77 6e 61 6d 65 24 0d 0b | c2 26 c8 99 20 22 57 69 |wname$..|.&.. "Wi|
|00002140| 6d 70 5f 43 72 65 61 74 | 65 49 63 6f 6e 22 2c 2c |mp_Creat|eIcon",,|
|00002150| 62 20 b8 20 69 68 61 6e | 64 6c 65 25 0d 0b cc 3a |b . ihan|dle%...:|
|00002160| e7 20 72 65 64 72 61 77 | 20 8c 20 c8 99 20 22 57 |. redraw| . .. "W|
|00002170| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|00002180| 2c 62 21 30 2c 62 21 34 | 2c 62 21 38 2c 62 21 31 |,b!0,b!4|,b!8,b!1|
|00002190| 32 2c 62 21 31 36 0d 0b | d6 0d 3d 69 68 61 6e 64 |2,b!16..|..=ihand|
|000021a0| 6c 65 25 0d 0b e0 05 3a | 0d 0b ea 28 dd a4 69 63 |le%....:|...(..ic|
|000021b0| 6f 6e 5f 67 65 74 64 61 | 74 61 28 71 25 2c 77 68 |on_getda|ta(q%,wh|
|000021c0| 61 6e 64 6c 65 25 2c 69 | 68 61 6e 64 6c 65 25 29 |andle%,i|handle%)|
|000021d0| 0d 0b f4 11 71 25 21 30 | 3d 77 68 61 6e 64 6c 65 |....q%!0|=whandle|
|000021e0| 25 0d 0b fe 11 71 25 21 | 34 3d 69 68 61 6e 64 6c |%....q%!|4=ihandl|
|000021f0| 65 25 0d 0c 08 1e c8 99 | 20 22 57 69 6d 70 5f 47 |e%......| "Wimp_G|
|00002200| 65 74 49 63 6f 6e 53 74 | 61 74 65 22 2c 2c 71 25 |etIconSt|ate",,q%|
|00002210| 0d 0c 12 0d 3d 24 28 71 | 25 21 32 38 29 0d 0c 1c |....=$(q|%!28)...|
|00002220| 05 3a 0d 0c 26 45 dd f2 | 63 61 72 65 74 5f 73 65 |.:..&E..|caret_se|
|00002230| 74 70 6f 73 69 74 69 6f | 6e 28 77 68 61 6e 64 6c |tpositio|n(whandl|
|00002240| 65 25 2c 69 68 61 6e 64 | 6c 65 25 2c 78 6f 66 66 |e%,ihand|le%,xoff|
|00002250| 25 2c 79 6f 66 66 25 2c | 68 65 69 67 68 74 25 2c |%,yoff%,|height%,|
|00002260| 69 6e 64 65 78 25 29 0d | 0c 30 4b c8 99 20 22 57 |index%).|.0K.. "W|
|00002270| 69 6d 70 5f 53 65 74 43 | 61 72 65 74 50 6f 73 69 |imp_SetC|aretPosi|
|00002280| 74 69 6f 6e 22 2c 77 68 | 61 6e 64 6c 65 25 2c 69 |tion",wh|andle%,i|
|00002290| 68 61 6e 64 6c 65 25 2c | 78 6f 66 66 25 2c 79 6f |handle%,|xoff%,yo|
|000022a0| 66 66 25 2c 68 65 69 67 | 68 74 25 2c 69 6e 64 65 |ff%,heig|ht%,inde|
|000022b0| 78 25 0d 0c 3a 05 e1 0d | 0c 44 05 3a 0d 0c 4e 0d |x%..:...|.D.:..N.|
|000022c0| dd f2 6e 65 77 76 61 6c | 73 0d 0c 58 17 67 74 78 |..newval|s..X.gtx|
|000022d0| 3d 71 25 21 33 36 3a 67 | 74 79 3d 71 25 21 34 30 |=q%!36:g|ty=q%!40|
|000022e0| 0d 0c 62 15 77 62 78 3d | 71 25 21 34 3a 77 62 79 |..b.wbx=|q%!4:wby|
|000022f0| 3d 71 25 21 38 0d 0c 6c | 17 77 74 78 3d 71 25 21 |=q%!8..l|.wtx=q%!|
|00002300| 31 32 3a 77 74 79 3d 71 | 25 21 31 36 0d 0c 76 17 |12:wty=q|%!16..v.|
|00002310| 78 73 63 3d 71 25 21 32 | 30 3a 79 73 63 3d 71 25 |xsc=q%!2|0:ysc=q%|
|00002320| 21 32 34 0d 0c 80 21 68 | 70 3d 77 74 78 2d 77 62 |!24...!h|p=wtx-wb|
|00002330| 78 3a 76 70 3d 77 74 79 | 2d 77 62 79 3a 65 62 78 |x:vp=wty|-wby:ebx|
|00002340| 3d 78 73 63 0d 0c 8a 21 | 65 74 78 3d 78 73 63 2b |=xsc...!|etx=xsc+|
|00002350| 68 70 3a 65 74 79 3d 79 | 73 63 3a 65 62 79 3d 79 |hp:ety=y|sc:eby=y|
|00002360| 73 63 2d 76 70 0d 0c 94 | 05 e1 0d 0c 9e 05 3a 0d |sc-vp...|......:.|
|00002370| 0c a8 32 dd f2 64 65 66 | 69 6e 65 5f 6d 65 6e 75 |..2..def|ine_menu|
|00002380| 5f 74 65 78 74 28 74 65 | 78 74 24 2c 6e 2c 77 2c |_text(te|xt$,n,w,|
|00002390| 74 2c 64 2c 73 2c 66 6c | 61 67 73 2c 73 6d 2c 6c |t,d,s,fl|ags,sm,l|
|000023a0| 29 0d 0c b2 12 74 65 78 | 74 24 28 6e 29 3d 74 65 |)....tex|t$(n)=te|
|000023b0| 78 74 24 0d 0c bc 10 73 | 65 74 74 69 6e 67 28 6e |xt$....s|etting(n|
|000023c0| 29 3d 30 0d 0c c6 38 e7 | 20 77 20 8c 20 73 65 74 |)=0...8.| w . set|
|000023d0| 74 69 6e 67 28 6e 29 3d | 73 65 74 74 69 6e 67 28 |ting(n)=|setting(|
|000023e0| 6e 29 20 84 20 26 30 34 | 3a 66 6c 61 67 73 3d 66 |n) . &04|:flags=f|
|000023f0| 6c 61 67 73 20 84 20 26 | 31 30 30 0d 0c d0 25 e7 |lags . &|100...%.|
|00002400| 20 74 20 8c 20 73 65 74 | 74 69 6e 67 28 6e 29 3d | t . set|ting(n)=|
|00002410| 73 65 74 74 69 6e 67 28 | 6e 29 20 84 20 26 30 31 |setting(|n) . &01|
|00002420| 0d 0c da 25 e7 20 64 20 | 8c 20 73 65 74 74 69 6e |...%. d |. settin|
|00002430| 67 28 6e 29 3d 73 65 74 | 74 69 6e 67 28 6e 29 20 |g(n)=set|ting(n) |
|00002440| 84 20 26 30 32 0d 0c e4 | 25 e7 20 6c 20 8c 20 73 |. &02...|%. l . s|
|00002450| 65 74 74 69 6e 67 28 6e | 29 3d 73 65 74 74 69 6e |etting(n|)=settin|
|00002460| 67 28 6e 29 20 84 20 26 | 38 30 0d 0c ee 1f e7 20 |g(n) . &|80..... |
|00002470| 73 20 8c 20 66 6c 61 67 | 73 3d 66 6c 61 67 73 20 |s . flag|s=flags |
|00002480| 84 20 26 34 30 30 30 30 | 30 0d 0c f8 12 66 6c 61 |. &40000|0....fla|
|00002490| 67 73 28 6e 29 3d 66 6c | 61 67 73 0d 0d 02 11 73 |gs(n)=fl|ags....s|
|000024a0| 75 62 6d 65 6e 75 28 6e | 29 3d 73 6d 0d 0d 0c 05 |ubmenu(n|)=sm....|
|000024b0| e1 0d 0d 16 05 3a 0d 0d | 20 26 dd f2 63 72 65 61 |.....:..| &..crea|
|000024c0| 74 65 5f 6d 65 6e 75 28 | 74 69 74 6c 65 24 2c 6e |te_menu(|title$,n|
|000024d0| 2c 77 69 64 74 68 25 2c | 78 2c 79 29 0d 0d 2a 0d |,width%,|x,y)..*.|
|000024e0| 6d 62 25 3d 6d 65 6e 75 | 25 0d 0d 34 0f 6d 65 6e |mb%=menu|%..4.men|
|000024f0| 75 73 3d 30 3a 71 3d 30 | 0d 0d 3e 05 f5 0d 0d 48 |us=0:q=0|..>....H|
|00002500| 21 20 20 6d 65 6e 75 70 | 6f 73 28 6d 65 6e 75 73 |!  menup|os(menus|
|00002510| 29 3d 6d 62 25 3a 6d 65 | 6e 75 73 2b 3d 31 0d 0d |)=mb%:me|nus+=1..|
|00002520| 52 11 20 20 24 6d 62 25 | 3d 74 69 74 6c 65 24 0d |R.  $mb%|=title$.|
|00002530| 0d 5c 0e 20 20 6d 62 25 | 3f 31 32 3d 37 0d 0d 66 |.\.  mb%|?12=7..f|
|00002540| 0e 20 20 6d 62 25 3f 31 | 33 3d 32 0d 0d 70 0e 20 |.  mb%?1|3=2..p. |
|00002550| 20 6d 62 25 3f 31 34 3d | 37 0d 0d 7a 0e 20 20 6d | mb%?14=|7..z.  m|
|00002560| 62 25 3f 31 35 3d 30 0d | 0d 84 13 20 20 6d 62 25 |b%?15=0.|...  mb%|
|00002570| 21 31 36 3d 77 69 64 74 | 68 25 0d 0d 8e 27 20 20 |!16=widt|h%...'  |
|00002580| 6d 62 25 21 32 30 3d 34 | 30 20 3a f4 20 68 65 69 |mb%!20=4|0 :. hei|
|00002590| 67 68 74 20 6f 66 20 6d | 65 6e 75 20 69 74 65 6d |ght of m|enu item|
|000025a0| 73 0d 0d 98 41 20 20 6d | 62 25 21 32 34 3d 30 20 |s...A  m|b%!24=0 |
|000025b0| 20 3a f4 20 76 65 72 74 | 69 63 61 6c 20 67 61 70 | :. vert|ical gap|
|000025c0| 20 62 65 74 77 65 65 6e | 20 69 74 65 6d 73 20 28 | between| items (|
|000025d0| 61 6c 73 6f 20 74 6f 70 | 20 26 20 62 6f 74 74 6f |also top| & botto|
|000025e0| 6d 29 0d 0d a2 14 20 20 | 69 74 65 6d 70 74 72 3d |m)....  |itemptr=|
|000025f0| 6d 62 25 2b 32 38 0d 0d | ac 07 20 20 f5 0d 0d b6 |mb%+28..|..  ....|
|00002600| 1c 20 20 20 20 69 74 65 | 6d 70 74 72 21 30 3d 73 |.    ite|mptr!0=s|
|00002610| 65 74 74 69 6e 67 28 71 | 29 0d 0d c0 18 20 20 20 |etting(q|)....   |
|00002620| 20 72 65 66 28 71 29 3d | 69 74 65 6d 70 74 72 2b | ref(q)=|itemptr+|
|00002630| 34 0d 0d ca 2a 20 20 20 | 20 69 74 65 6d 70 74 72 |4...*   | itemptr|
|00002640| 21 38 3d 66 6c 61 67 73 | 28 71 29 20 84 20 30 3c |!8=flags|(q) . 0<|
|00002650| 3c 32 38 20 84 20 37 3c | 3c 32 34 0d 0d d4 1f 20 |<28 . 7<|<24.... |
|00002660| 20 20 20 e7 20 28 66 6c | 61 67 73 28 71 29 20 80 |   . (fl|ags(q) .|
|00002670| 20 26 31 30 30 29 3d 30 | 20 8c 0d 0d de 20 20 20 | &100)=0| ....   |
|00002680| 20 20 20 20 24 28 69 74 | 65 6d 70 74 72 2b 31 32 |    $(it|emptr+12|
|00002690| 29 3d 74 65 78 74 24 28 | 71 29 0d 0d e8 09 20 20 |)=text$(|q)....  |
|000026a0| 20 20 cc 0d 0d f2 1c 20 | 20 20 20 20 20 70 6f 73 |  ..... |     pos|
|000026b0| 3d a7 74 65 78 74 24 28 | 71 29 2c 22 28 22 29 0d |=.text$(|q),"(").|
|000026c0| 0d fc 28 20 20 20 20 20 | 20 69 74 65 6d 70 74 72 |..(     | itemptr|
|000026d0| 21 31 32 3d a0 28 c0 74 | 65 78 74 24 28 71 29 2c |!12=.(.t|ext$(q),|
|000026e0| 70 6f 73 2d 31 29 29 0d | 0e 06 17 20 20 20 20 20 |pos-1)).|...     |
|000026f0| 20 69 74 65 6d 70 74 72 | 21 31 36 3d 2d 31 0d 0e | itemptr|!16=-1..|
|00002700| 10 32 20 20 20 20 20 20 | 69 74 65 6d 70 74 72 21 |.2      |itemptr!|
|00002710| 32 30 3d a0 28 c2 74 65 | 78 74 24 28 71 29 2c a9 |20=.(.te|xt$(q),.|
|00002720| 28 74 65 78 74 24 28 71 | 29 29 2d 70 6f 73 29 29 |(text$(q|))-pos))|
|00002730| 0d 0e 1a 09 20 20 20 20 | cd 0d 0e 24 18 20 20 20 |....    |...$.   |
|00002740| 20 69 74 65 6d 70 74 72 | 2b 3d 32 34 3a 71 2b 3d | itemptr|+=24:q+=|
|00002750| 31 0d 0e 2e 1e 20 20 fd | 20 28 73 65 74 74 69 6e |1....  .| (settin|
|00002760| 67 28 71 2d 31 29 20 80 | 20 26 38 30 29 3e 30 0d |g(q-1) .| &80)>0.|
|00002770| 0e 38 11 20 20 6d 62 25 | 3d 69 74 65 6d 70 74 72 |.8.  mb%|=itemptr|
|00002780| 0d 0e 42 23 20 20 e7 20 | 71 3c 3e 6e 20 8c 20 74 |..B#  . |q<>n . t|
|00002790| 69 74 6c 65 24 3d 74 65 | 78 74 24 28 71 29 3a 71 |itle$=te|xt$(q):q|
|000027a0| 2b 3d 31 0d 0e 4c 09 fd | 20 71 3d 6e 0d 0e 56 0f |+=1..L..| q=n..V.|
|000027b0| e3 20 71 3d 30 20 b8 20 | 6e 2d 31 0d 0e 60 29 20 |. q=0 . |n-1..`) |
|000027c0| 20 e7 20 73 75 62 6d 65 | 6e 75 28 71 29 3e 30 20 | . subme|nu(q)>0 |
|000027d0| 80 20 73 75 62 6d 65 6e | 75 28 71 29 3c 6d 65 6e |. submen|u(q)<men|
|000027e0| 75 73 20 8c 0d 0e 6a 23 | 20 20 20 20 21 72 65 66 |us ...j#|    !ref|
|000027f0| 28 71 29 3d 6d 65 6e 75 | 70 6f 73 28 73 75 62 6d |(q)=menu|pos(subm|
|00002800| 65 6e 75 28 71 29 29 0d | 0e 74 07 20 20 cc 0d 0e |enu(q)).|.t.  ...|
|00002810| 7e 48 20 20 20 20 21 72 | 65 66 28 71 29 3d 73 75 |~H    !r|ef(q)=su|
|00002820| 62 6d 65 6e 75 28 71 29 | 3a f4 20 77 61 73 20 2d |bmenu(q)|:. was -|
|00002830| 31 20 69 2e 65 2e 20 73 | 75 62 6d 65 6e 75 20 64 |1 i.e. s|ubmenu d|
|00002840| 69 73 61 6c 6c 6f 77 65 | 64 21 20 54 68 69 73 20 |isallowe|d! This |
|00002850| 63 68 61 6e 67 65 0d 0e | 88 3e 20 20 20 20 20 20 |change..|.>      |
|00002860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002870| 3a f4 20 61 6c 6c 6f 77 | 73 20 61 20 77 69 6e 64 |:. allow|s a wind|
|00002880| 6f 77 20 68 61 6e 64 6c | 65 20 74 6f 20 62 65 20 |ow handl|e to be |
|00002890| 75 73 65 64 0d 0e 92 07 | 20 20 cd 0d 0e 9c 07 ed |used....|  ......|
|000028a0| 20 71 0d 0e a6 23 c8 99 | 20 22 57 69 6d 70 5f 43 | q...#..| "Wimp_C|
|000028b0| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 6d 65 6e 75 |reateMen|u",,menu|
|000028c0| 25 2c 78 2c 79 0d 0e b0 | 05 e1 0d 0e ba 05 3a 0d |%,x,y...|......:.|
|000028d0| 0e c4 1d dd f2 6f 70 65 | 6e 74 65 6d 70 6c 61 74 |.....ope|ntemplat|
|000028e0| 65 66 69 6c 65 28 46 49 | 4c 45 24 29 0d 0e ce 21 |efile(FI|LE$)...!|
|000028f0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 54 65 6d |.. "Wimp|_OpenTem|
|00002900| 70 6c 61 74 65 22 2c 2c | 46 49 4c 45 24 0d 0e d8 |plate",,|FILE$...|
|00002910| 05 e1 0d 0e e2 05 3a 0d | 0e ec 19 dd f2 6c 6f 61 |......:.|.....loa|
|00002920| 64 74 65 6d 70 6c 61 74 | 65 28 6e 61 6d 65 24 29 |dtemplat|e(name$)|
|00002930| 0d 0e f6 13 ea 20 74 79 | 70 65 25 2c 70 6f 73 25 |..... ty|pe%,pos%|
|00002940| 2c 78 25 0d 0f 00 4c c8 | 99 20 22 57 69 6d 70 5f |,x%...L.|. "Wimp_|
|00002950| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 71 |LoadTemp|late",,q|
|00002960| 25 2c 69 70 74 72 25 2c | 69 65 6e 64 25 2c 2d 31 |%,iptr%,|iend%,-1|
|00002970| 2c 6e 61 6d 65 24 2c 30 | 20 b8 20 74 79 70 65 25 |,name$,0| . type%|
|00002980| 2c 2c 69 70 74 72 25 2c | 2c 2c 2c 70 6f 73 25 0d |,,iptr%,|,,,pos%.|
|00002990| 0f 0a 05 e1 0d 0f 14 05 | 3a 0d 0f 1e 17 dd f2 63 |........|:......c|
|000029a0| 6c 6f 73 65 74 65 6d 70 | 6c 61 74 65 66 69 6c 65 |losetemp|latefile|
|000029b0| 0d 0f 28 1b c8 99 20 22 | 57 69 6d 70 5f 43 6c 6f |..(... "|Wimp_Clo|
|000029c0| 73 65 54 65 6d 70 6c 61 | 74 65 22 0d 0f 32 05 e1 |seTempla|te"..2..|
|000029d0| 0d 0f 3c 05 3a 0d 0f 46 | 20 dd f2 6d 6f 75 73 65 |..<.:..F| ..mouse|
|000029e0| 5f 72 65 63 74 61 6e 67 | 28 78 25 2c 79 25 2c 77 |_rectang|(x%,y%,w|
|000029f0| 25 2c 68 25 29 0d 0f 50 | 1a c8 97 20 52 45 43 54 |%,h%)..P|... RECT|
|00002a00| 61 6e 67 20 78 25 2c 79 | 25 2c 77 25 2c 68 25 0d |ang x%,y|%,w%,h%.|
|00002a10| 0f 5a 05 e1 0d 0f 64 05 | 3a 0d 0f 6e 1d dd f2 6d |.Z....d.|:..n...m|
|00002a20| 6f 75 73 65 5f 6c 69 6d | 69 74 28 62 2c 77 68 61 |ouse_lim|it(b,wha|
|00002a30| 6e 64 6c 65 25 29 0d 0f | 78 2c 62 21 30 3d 77 68 |ndle%)..|x,b!0=wh|
|00002a40| 61 6e 64 6c 65 25 3a c8 | 99 20 22 57 69 6d 70 5f |andle%:.|. "Wimp_|
|00002a50| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|00002a60| 2c 62 0d 0f 82 2d f2 6d | 6f 75 73 65 5f 72 65 63 |,b...-.m|ouse_rec|
|00002a70| 74 61 6e 67 28 62 21 34 | 2c 62 21 38 2c 62 21 31 |tang(b!4|,b!8,b!1|
|00002a80| 32 2d 62 21 34 2c 62 21 | 31 36 2d 62 21 38 29 0d |2-b!4,b!|16-b!8).|
|00002a90| 0f 8c 05 e1 0d 0f 96 05 | 3a 0d 0f a0 14 dd f2 64 |........|:......d|
|00002aa0| 65 6c 61 79 28 73 65 63 | 6f 6e 64 73 29 0d 0f aa |elay(sec|onds)...|
|00002ab0| 0a ea 20 74 69 6d 65 0d | 0f b4 1e 74 69 6d 65 20 |.. time.|...time |
|00002ac0| 3d 20 91 20 2b 20 28 73 | 65 63 6f 6e 64 73 20 2a |= . + (s|econds *|
|00002ad0| 20 31 30 30 29 0d 0f be | 05 f5 0d 0f c8 0e fd 20 | 100)...|....... |
|00002ae0| 91 20 3e 20 74 69 6d 65 | 0d 0f d2 05 e1 0d 0f dc |. > time|........|
|00002af0| 05 3a 0d 0f e6 19 dd a4 | 75 70 70 65 72 5f 63 61 |.:......|upper_ca|
|00002b00| 73 65 28 73 74 72 69 6e | 67 24 29 0d 0f f0 0b ea |se(strin|g$).....|
|00002b10| 20 6c 6f 6f 70 25 0d 0f | fa 16 e7 20 a9 28 73 74 | loop%..|... .(st|
|00002b20| 72 69 6e 67 24 29 20 3e | 20 30 20 8c 0d 10 04 1d |ring$) >| 0 .....|
|00002b30| 20 e3 20 6c 6f 6f 70 25 | 20 3d 20 31 20 b8 20 a9 | . loop%| = 1 . .|
|00002b40| 28 73 74 72 69 6e 67 24 | 29 0d 10 0e 3a 20 20 20 |(string$|)...:   |
|00002b50| e7 20 c1 73 74 72 69 6e | 67 24 2c 6c 6f 6f 70 25 |. .strin|g$,loop%|
|00002b60| 2c 31 29 3e 3d 22 61 22 | 20 80 20 c1 73 74 72 69 |,1)>="a"| . .stri|
|00002b70| 6e 67 24 2c 6c 6f 6f 70 | 25 2c 31 29 3c 3d 22 7a |ng$,loop|%,1)<="z|
|00002b80| 22 20 8c 0d 10 18 3a 20 | 20 20 20 20 c1 73 74 72 |" ....: |    .str|
|00002b90| 69 6e 67 24 2c 6c 6f 6f | 70 25 2c 31 29 20 3d 20 |ing$,loo|p%,1) = |
|00002ba0| bd 28 97 28 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |.(.(.str|ing$,loo|
|00002bb0| 70 25 2c 31 29 29 20 80 | 20 26 44 46 29 0d 10 22 |p%,1)) .| &DF).."|
|00002bc0| 08 20 20 20 cd 0d 10 2c | 0c 20 ed 20 6c 6f 6f 70 |.   ...,|. . loop|
|00002bd0| 25 0d 10 36 05 cd 0d 10 | 40 0d 3d 20 73 74 72 69 |%..6....|@.= stri|
|00002be0| 6e 67 24 0d 10 4a 05 3a | 0d 10 54 27 dd f2 57 69 |ng$..J.:|..T'..Wi|
|00002bf0| 6e 64 6f 77 5f 52 65 54 | 69 74 6c 65 28 62 2c 77 |ndow_ReT|itle(b,w|
|00002c00| 68 61 6e 64 6c 65 25 2c | 74 69 74 6c 65 24 29 0d |handle%,|title$).|
|00002c10| 10 5e 0b ea 20 77 6f 62 | 6c 6b 0d 10 68 0d de 20 |.^.. wob|lk..h.. |
|00002c20| 77 6f 62 6c 6b 20 35 0d | 10 72 10 62 21 30 3d 77 |woblk 5.|.r.b!0=w|
|00002c30| 68 61 6e 64 6c 65 25 0d | 10 7c 1e c8 99 20 22 57 |handle%.|.|... "W|
|00002c40| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 49 6e 66 |imp_GetW|indowInf|
|00002c50| 6f 22 2c 2c 62 0d 10 86 | 15 24 28 21 28 62 2b 37 |o",,b...|.$(!(b+7|
|00002c60| 36 29 29 3d 74 69 74 6c | 65 24 0d 10 90 14 77 6f |6))=titl|e$....wo|
|00002c70| 62 6c 6b 21 30 3d 77 68 | 61 6e 64 6c 65 25 0d 10 |blk!0=wh|andle%..|
|00002c80| 9a 25 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |.%.. "Wi|mp_GetWi|
|00002c90| 6e 64 6f 77 4f 75 74 6c | 69 6e 65 22 2c 2c 77 6f |ndowOutl|ine",,wo|
|00002ca0| 62 6c 6b 0d 10 a4 44 c8 | 99 20 22 57 69 6d 70 5f |blk...D.|. "Wimp_|
|00002cb0| 46 6f 72 63 65 52 65 64 | 72 61 77 22 2c 2d 31 2c |ForceRed|raw",-1,|
|00002cc0| 77 6f 62 6c 6b 21 34 2c | 28 77 6f 62 6c 6b 21 31 |woblk!4,|(woblk!1|
|00002cd0| 36 29 2d 34 30 2c 77 6f | 62 6c 6b 21 31 32 2c 77 |6)-40,wo|blk!12,w|
|00002ce0| 6f 62 6c 6b 21 31 36 0d | 10 ae 05 e1 0d 10 b8 05 |oblk!16.|........|
|00002cf0| 3a 0d 10 c2 11 dd a4 6c | 65 61 66 28 70 61 74 68 |:......l|eaf(path|
|00002d00| 24 29 0d 10 cc 12 c8 95 | 20 a7 70 61 74 68 24 2c |$)......| .path$,|
|00002d10| 22 2e 22 29 0d 10 d6 21 | 20 20 70 61 74 68 24 3d |".")...!|  path$=|
|00002d20| c1 70 61 74 68 24 2c a7 | 70 61 74 68 24 2c 22 2e |.path$,.|path$,".|
|00002d30| 22 29 2b 31 29 0d 10 e0 | 05 ce 0d 10 ea 0a 3d 70 |")+1)...|......=p|
|00002d40| 61 74 68 24 0d 10 f4 05 | 3a 0d 10 fe 10 dd a4 67 |ath$....|:......g|
|00002d50| 6e 61 6d 65 28 70 74 72 | 29 0d 11 08 09 66 24 3d |name(ptr|)....f$=|
|00002d60| 22 22 0d 11 12 19 c8 95 | 20 3f 70 74 72 3c 3e 30 |""......| ?ptr<>0|
|00002d70| 20 80 20 3f 70 74 72 3c | 3e 31 33 0d 11 1c 18 20 | . ?ptr<|>13.... |
|00002d80| 20 66 24 3d 66 24 2b bd | 3f 70 74 72 3a 70 74 72 | f$=f$+.|?ptr:ptr|
|00002d90| 2b 3d 31 0d 11 26 05 ce | 0d 11 30 07 3d 66 24 0d |+=1..&..|..0.=f$.|
|00002da0| 11 3a 05 3a 0d 11 44 1a | dd a4 66 69 6c 65 5f 6c |.:.:..D.|..file_l|
|00002db0| 65 6e 67 74 68 28 6f 62 | 6a 65 63 74 24 29 0d 11 |ength(ob|ject$)..|
|00002dc0| 4e 37 ea 20 74 79 70 65 | 25 2c 6c 6f 61 64 5f 61 |N7. type|%,load_a|
|00002dd0| 64 64 72 25 2c 65 78 65 | 63 5f 61 64 64 72 25 2c |ddr%,exe|c_addr%,|
|00002de0| 6c 65 6e 67 74 68 25 2c | 61 74 74 73 25 2c 73 74 |length%,|atts%,st|
|00002df0| 72 69 6e 67 24 0d 11 58 | 47 c8 99 20 22 4f 53 5f |ring$..X|G.. "OS_|
|00002e00| 46 69 6c 65 22 2c 35 2c | 6f 62 6a 65 63 74 24 20 |File",5,|object$ |
|00002e10| b8 20 74 79 70 65 25 2c | 2c 6c 6f 61 64 5f 61 64 |. type%,|,load_ad|
|00002e20| 64 72 25 2c 65 78 65 63 | 5f 61 64 64 72 25 2c 6c |dr%,exec|_addr%,l|
|00002e30| 65 6e 67 74 68 25 2c 61 | 74 74 73 25 0d 11 62 0c |ength%,a|tts%..b.|
|00002e40| 3d 6c 65 6e 67 74 68 25 | 0d 11 6c 05 3a 0d 11 76 |=length%|..l.:..v|
|00002e50| 13 dd a4 66 69 6c 65 5f | 64 61 74 65 28 46 24 29 |...file_|date(F$)|
|00002e60| 0d 11 80 0e ea 20 4c 25 | 2c 41 25 2c 54 25 0d 11 |..... L%|,A%,T%..|
|00002e70| 8a 17 24 66 62 75 66 66 | 65 72 25 3d c4 32 38 2c |..$fbuff|er%=.28,|
|00002e80| bd 28 30 29 29 0d 11 94 | 2f c8 99 20 22 4f 53 5f |.(0))...|/.. "OS_|
|00002e90| 46 69 6c 65 22 2c 35 2c | 46 24 20 b8 20 54 25 2c |File",5,|F$ . T%,|
|00002ea0| 2c 6c 61 64 64 72 25 2c | 65 61 64 64 72 25 2c 4c |,laddr%,|eaddr%,L|
|00002eb0| 25 2c 41 25 0d 11 9e 3b | f4 20 6c 6f 61 64 20 61 |%,A%...;|. load a|
|00002ec0| 6e 64 20 65 78 65 63 75 | 74 69 6f 6e 20 61 64 64 |nd execu|tion add|
|00002ed0| 72 65 73 73 65 73 20 61 | 72 65 2c 20 69 6e 20 66 |resses a|re, in f|
|00002ee0| 61 63 74 2c 20 74 69 6d | 65 20 73 74 61 6d 70 0d |act, tim|e stamp.|
|00002ef0| 11 a8 19 66 64 61 74 65 | 25 3f 34 3d 6c 61 64 64 |...fdate|%?4=ladd|
|00002f00| 72 25 20 80 20 26 46 46 | 0d 11 b2 1d 66 64 61 74 |r% . &FF|....fdat|
|00002f10| 65 25 3f 33 3d 65 61 64 | 64 72 25 3e 3e 32 34 20 |e%?3=ead|dr%>>24 |
|00002f20| 80 20 26 46 46 0d 11 bc | 1d 66 64 61 74 65 25 3f |. &FF...|.fdate%?|
|00002f30| 32 3d 65 61 64 64 72 25 | 3e 3e 31 36 20 80 20 26 |2=eaddr%|>>16 . &|
|00002f40| 46 46 0d 11 c6 1d 66 64 | 61 74 65 25 3f 31 3d 65 |FF....fd|ate%?1=e|
|00002f50| 61 64 64 72 25 3e 3e 38 | 20 20 80 20 26 46 46 0d |addr%>>8|  . &FF.|
|00002f60| 11 d0 1d 66 64 61 74 65 | 25 3f 30 3d 65 61 64 64 |...fdate|%?0=eadd|
|00002f70| 72 25 20 20 20 20 20 80 | 20 26 46 46 0d 11 da 3c |r%     .| &FF...<|
|00002f80| c8 99 20 22 4f 53 5f 43 | 6f 6e 76 65 72 74 53 74 |.. "OS_C|onvertSt|
|00002f90| 61 6e 64 61 72 64 44 61 | 74 65 41 6e 64 54 69 6d |andardDa|teAndTim|
|00002fa0| 65 22 2c 20 66 64 61 74 | 65 25 2c 20 66 62 75 66 |e", fdat|e%, fbuf|
|00002fb0| 66 65 72 25 2c 20 32 38 | 0d 11 e4 0e 3d 24 66 62 |fer%, 28|....=$fb|
|00002fc0| 75 66 66 65 72 25 0d 11 | ee 05 3a 0d 11 f8 19 dd |uffer%..|..:.....|
|00002fd0| a4 75 70 70 65 72 5f 63 | 61 73 65 28 73 74 72 69 |.upper_c|ase(stri|
|00002fe0| 6e 67 24 29 0d 12 02 0b | ea 20 6c 6f 6f 70 25 0d |ng$)....|. loop%.|
|00002ff0| 12 0c 16 e7 20 a9 28 73 | 74 72 69 6e 67 24 29 20 |.... .(s|tring$) |
|00003000| 3e 20 30 20 8c 0d 12 16 | 1d 20 e3 20 6c 6f 6f 70 |> 0 ....|. . loop|
|00003010| 25 20 3d 20 31 20 b8 20 | a9 28 73 74 72 69 6e 67 |% = 1 . |.(string|
|00003020| 24 29 0d 12 20 3a 20 20 | 20 e7 20 c1 73 74 72 69 |$).. :  | . .stri|
|00003030| 6e 67 24 2c 6c 6f 6f 70 | 25 2c 31 29 3e 3d 22 61 |ng$,loop|%,1)>="a|
|00003040| 22 20 80 20 c1 73 74 72 | 69 6e 67 24 2c 6c 6f 6f |" . .str|ing$,loo|
|00003050| 70 25 2c 31 29 3c 3d 22 | 7a 22 20 8c 0d 12 2a 3a |p%,1)<="|z" ...*:|
|00003060| 20 20 20 20 20 c1 73 74 | 72 69 6e 67 24 2c 6c 6f |     .st|ring$,lo|
|00003070| 6f 70 25 2c 31 29 20 3d | 20 bd 28 97 28 c1 73 74 |op%,1) =| .(.(.st|
|00003080| 72 69 6e 67 24 2c 6c 6f | 6f 70 25 2c 31 29 29 20 |ring$,lo|op%,1)) |
|00003090| 80 20 26 44 46 29 0d 12 | 34 08 20 20 20 cd 0d 12 |. &DF)..|4.   ...|
|000030a0| 3e 0c 20 ed 20 6c 6f 6f | 70 25 0d 12 48 05 cd 0d |>. . loo|p%..H...|
|000030b0| 12 52 0d 3d 20 73 74 72 | 69 6e 67 24 0d 12 5c 05 |.R.= str|ing$..\.|
|000030c0| 3a 0d 12 66 15 dd a4 42 | 75 66 66 5f 43 72 65 61 |:..f...B|uff_Crea|
|000030d0| 74 65 28 6c 25 29 0d 12 | 70 0e ea 20 66 25 2c 70 |te(l%)..|p.. f%,p|
|000030e0| 25 2c 6e 25 0d 12 7a 25 | e7 20 6c 25 83 34 3c 3e |%,n%..z%|. l%.4<>|
|000030f0| 30 20 8c 20 6e 25 3d 28 | 6c 25 81 34 2b 31 29 2a |0 . n%=(|l%.4+1)*|
|00003100| 34 20 8b 20 6e 25 3d 6c | 25 0d 12 84 23 c8 99 20 |4 . n%=l|%...#.. |
|00003110| 22 4f 53 5f 4d 6f 64 75 | 6c 65 22 2c 36 2c 2c 2c |"OS_Modu|le",6,,,|
|00003120| 6e 25 20 b8 20 2c 2c 70 | 25 3b 66 25 0d 12 8e 14 |n% . ,,p|%;f%....|
|00003130| e7 20 28 66 25 80 31 29 | 3c 3e a3 20 8c 20 3d 30 |. (f%.1)|<>. . =0|
|00003140| 0d 12 98 0a 21 70 25 3d | 6c 25 0d 12 a2 07 3d 70 |....!p%=|l%....=p|
|00003150| 25 0d 12 ac 05 3a 0d 12 | b6 14 dd f2 42 75 66 66 |%....:..|....Buff|
|00003160| 5f 53 63 72 61 70 28 70 | 25 29 0d 12 c0 18 c8 99 |_Scrap(p|%)......|
|00003170| 20 22 4f 53 5f 4d 6f 64 | 75 6c 65 22 2c 37 2c 2c | "OS_Mod|ule",7,,|
|00003180| 70 25 0d 12 ca 05 e1 0d | 12 d4 05 3a 0d 12 de 1b |p%......|...:....|
|00003190| dd f2 42 75 66 66 5f 45 | 6e 6c 61 72 67 65 28 f8 |..Buff_E|nlarge(.|
|000031a0| 20 70 25 2c 6c 25 29 0d | 12 e8 08 ea 20 6e 25 0d | p%,l%).|.... n%.|
|000031b0| 12 f2 1f e7 20 70 25 3d | 30 20 8c 20 70 25 3d a4 |.... p%=|0 . p%=.|
|000031c0| 42 75 66 66 5f 43 72 65 | 61 74 65 28 34 29 0d 12 |Buff_Cre|ate(4)..|
|000031d0| fc 17 6e 25 3d a4 42 75 | 66 66 5f 43 72 65 61 74 |..n%=.Bu|ff_Creat|
|000031e0| 65 28 6c 25 29 0d 13 06 | 0d e7 20 6e 25 3c 3e 30 |e(l%)...|.. n%<>0|
|000031f0| 20 8c 0d 13 10 17 20 20 | f2 42 75 66 66 5f 43 6f | .....  |.Buff_Co|
|00003200| 70 79 28 70 25 2c 6e 25 | 29 0d 13 1a 15 20 20 f2 |py(p%,n%|)....  .|
|00003210| 42 75 66 66 5f 53 63 72 | 61 70 28 70 25 29 0d 13 |Buff_Scr|ap(p%)..|
|00003220| 24 0b 20 20 70 25 3d 6e | 25 0d 13 2e 05 cc 0d 13 |$.  p%=n|%.......|
|00003230| 38 0a 20 20 70 25 3d 30 | 0d 13 42 05 cd 0d 13 4c |8.  p%=0|..B....L|
|00003240| 05 e1 0d 13 56 05 3a 0d | 13 60 16 dd f2 42 75 66 |....V.:.|.`...Buf|
|00003250| 66 5f 43 6f 70 79 28 70 | 25 2c 6e 25 29 0d 13 6a |f_Copy(p|%,n%)..j|
|00003260| 08 ea 20 69 25 0d 13 74 | 48 e7 21 70 25 3e 21 6e |.. i%..t|H.!p%>!n|
|00003270| 25 20 8c 20 85 20 31 30 | 31 2c 22 45 52 52 4f 52 |% . . 10|1,"ERROR|
|00003280| 20 2d 20 42 75 66 66 65 | 72 20 74 6f 6f 20 73 6d | - Buffe|r too sm|
|00003290| 61 6c 6c 2c 20 69 6e 20 | 42 75 66 66 5f 43 6f 70 |all, in |Buff_Cop|
|000032a0| 79 20 50 72 6f 63 65 64 | 75 72 65 3b 22 0d 13 7e |y Proced|ure;"..~|
|000032b0| 58 e7 21 70 25 83 34 3c | 3e 30 20 8c 20 85 20 31 |X.!p%.4<|>0 . . 1|
|000032c0| 30 32 2c 22 45 52 52 4f | 52 20 2d 20 42 75 66 66 |02,"ERRO|R - Buff|
|000032d0| 65 72 20 73 69 7a 65 20 | 6e 6f 74 20 61 20 6d 75 |er size |not a mu|
|000032e0| 6c 74 69 70 6c 65 20 6f | 66 20 34 2c 20 69 6e 20 |ltiple o|f 4, in |
|000032f0| 42 75 66 66 5f 43 6f 70 | 79 20 50 72 6f 63 65 64 |Buff_Cop|y Proced|
|00003300| 75 72 65 3b 22 0d 13 88 | 16 e3 20 69 25 3d 34 20 |ure;"...|.. i%=4 |
|00003310| b8 20 21 70 25 2d 31 20 | 88 20 34 0d 13 92 11 20 |. !p%-1 |. 4.... |
|00003320| 20 6e 25 21 69 25 3d 70 | 25 21 69 25 0d 13 9c 08 | n%!i%=p|%!i%....|
|00003330| ed 20 69 25 0d 13 a6 05 | e1 0d 13 b0 05 3a 0d 13 |. i%....|.....:..|
|00003340| ba 1c dd a4 42 75 66 66 | 5f 66 69 6c 65 6c 6f 61 |....Buff|_fileloa|
|00003350| 64 28 6e 24 2c f8 20 62 | 25 29 0d 13 c4 14 ea 20 |d(n$,. b|%)..... |
|00003360| 74 25 2c 6c 25 2c 65 25 | 2c 6e 25 2c 72 25 0d 13 |t%,l%,e%|,n%,r%..|
|00003370| ce 21 c8 99 22 4f 53 5f | 46 69 6c 65 22 2c 35 2c |.!.."OS_|File",5,|
|00003380| 6e 24 20 b8 20 72 25 2c | 2c 74 25 2c 2c 6c 25 0d |n$ . r%,|,t%,,l%.|
|00003390| 13 d8 0e 65 25 3d 6c 25 | 2b 26 34 30 30 0d 13 e2 |...e%=l%|+&400...|
|000033a0| 23 e7 20 65 25 3e 21 62 | 25 20 8c 20 f2 42 75 66 |#. e%>!b|% . .Buf|
|000033b0| 66 5f 45 6e 6c 61 72 67 | 65 28 62 25 2c 65 25 29 |f_Enlarg|e(b%,e%)|
|000033c0| 0d 13 ec 0f e7 20 62 25 | 3d 30 20 8c 20 3d 30 0d |..... b%|=0 . =0.|
|000033d0| 13 f6 33 62 25 21 34 3d | 6c 25 3a c8 99 20 22 4f |..3b%!4=|l%:.. "O|
|000033e0| 53 5f 46 69 6c 65 22 2c | 32 35 35 2c 6e 24 2c 62 |S_File",|255,n$,b|
|000033f0| 25 2b 38 2c 30 3a 21 28 | 62 25 2b 6c 25 2b 38 29 |%+8,0:!(|b%+l%+8)|
|00003400| 3d 30 0d 14 00 09 3d 62 | 25 2b 34 0d 14 0a 05 3a |=0....=b|%+4....:|
|00003410| 0d 14 14 20 dd f2 6b 65 | 79 70 72 65 73 73 5f 6d |... ..ke|ypress_m|
|00003420| 61 69 6e 77 28 69 63 6f | 6e 25 2c 6b 65 79 25 29 |ainw(ico|n%,key%)|
|00003430| 0d 14 1e 0a 73 65 74 25 | 3d b9 0d 14 28 0a c8 8e |....set%|=...(...|
|00003440| 20 b9 20 ca 0d 14 32 0e | 20 c9 20 69 63 6f 6e 25 | . ...2.| . icon%|
|00003450| 3d 38 0d 14 3c 0c 20 20 | c8 8e 20 b9 20 ca 0d 14 |=8..<.  |.. . ...|
|00003460| 46 10 20 20 20 c9 20 6b | 65 79 25 3d 31 33 0d 14 |F.   . k|ey%=13..|
|00003470| 50 29 20 20 20 20 6f 72 | 64 65 72 24 3d a4 69 63 |P)    or|der$=.ic|
|00003480| 6f 6e 5f 67 65 74 64 61 | 74 61 28 71 25 2c 6d 61 |on_getda|ta(q%,ma|
|00003490| 69 6e 77 25 2c 38 29 0d | 14 5a 23 20 20 20 20 6f |inw%,8).|.Z#    o|
|000034a0| 72 64 65 72 25 3d bb 28 | 6f 72 64 65 72 24 29 3a |rder%=.(|order$):|
|000034b0| 63 68 61 6e 67 65 64 25 | 3d b9 0d 14 64 08 20 20 |changed%|=...d.  |
|000034c0| 20 cb 0d 14 6e 06 20 cb | 0d 14 78 05 e1 0d 14 82 | ...n. .|..x.....|
|000034d0| 05 3a 0d 14 8c 31 dd a4 | 6f 73 5f 56 61 72 47 65 |.:...1..|os_VarGe|
|000034e0| 74 56 61 6c 28 62 75 66 | 66 65 72 25 2c 73 69 7a |tVal(buf|fer%,siz|
|000034f0| 65 25 2c 76 61 72 6e 61 | 6d 65 24 2c 65 78 70 61 |e%,varna|me$,expa|
|00003500| 6e 64 29 0d 14 96 25 ea | 20 76 61 6c 75 65 24 2c |nd)...%.| value$,|
|00003510| 6e 72 5f 62 79 74 65 73 | 25 2c 6e 61 6d 65 70 74 |nr_bytes|%,namept|
|00003520| 72 25 2c 6c 6f 6f 70 25 | 0d 14 a0 5b c8 99 20 22 |r%,loop%|...[.. "|
|00003530| 58 4f 53 5f 52 65 61 64 | 56 61 72 56 61 6c 22 2c |XOS_Read|VarVal",|
|00003540| 76 61 72 6e 61 6d 65 24 | 2c 62 75 66 66 65 72 25 |varname$|,buffer%|
|00003550| 2c 73 69 7a 65 25 2c 30 | 2c 2d 33 2a 28 65 78 70 |,size%,0|,-3*(exp|
|00003560| 61 6e 64 3d b9 29 20 b8 | 20 2c 2c 6e 72 5f 62 79 |and=.) .| ,,nr_by|
|00003570| 74 65 73 25 2c 6e 61 6d | 65 70 74 72 25 2c 74 79 |tes%,nam|eptr%,ty|
|00003580| 70 65 25 0d 14 aa 1b e3 | 20 6c 6f 6f 70 25 3d 30 |pe%.....| loop%=0|
|00003590| 20 b8 20 6e 72 5f 62 79 | 74 65 73 25 2d 31 0d 14 | . nr_by|tes%-1..|
|000035a0| b4 33 20 20 76 61 6c 75 | 65 24 3d 76 61 6c 75 65 |.3  valu|e$=value|
|000035b0| 24 2b bd 28 6e 61 6d 65 | 70 74 72 25 3f 28 6c 6f |$+.(name|ptr%?(lo|
|000035c0| 6f 70 25 2b a9 76 61 72 | 6e 61 6d 65 24 2b 33 29 |op%+.var|name$+3)|
|000035d0| 29 0d 14 be 0b ed 20 6c | 6f 6f 70 25 0d 14 c8 0b |)..... l|oop%....|
|000035e0| 3d 76 61 6c 75 65 24 0d | 14 d2 05 3a 0d 14 dc 0a |=value$.|...:....|
|000035f0| dd 20 f2 72 61 64 0d 14 | e6 12 e3 20 70 6c 61 6e |. .rad..|... plan|
|00003600| 65 74 3d 31 20 b8 20 39 | 0d 14 f0 1f 20 f3 20 72 |et=1 . 9|.... . r|
|00003610| 61 64 28 70 6c 61 6e 65 | 74 29 2c 74 69 6d 65 28 |ad(plane|t),time(|
|00003620| 70 6c 61 6e 65 74 29 0d | 14 fa 0c ed 20 70 6c 61 |planet).|.... pla|
|00003630| 6e 65 74 0d 15 04 12 e3 | 20 70 6c 61 6e 65 74 3d |net.....| planet=|
|00003640| 31 20 b8 20 39 0d 15 0e | 2d 20 61 6e 67 28 70 6c |1 . 9...|- ang(pl|
|00003650| 61 6e 65 74 29 3d 28 28 | af 2a 32 29 2f 28 74 69 |anet)=((|.*2)/(ti|
|00003660| 6d 65 28 70 6c 61 6e 65 | 74 29 29 29 2a 38 36 34 |me(plane|t)))*864|
|00003670| 30 30 0d 15 18 0c ed 20 | 70 6c 61 6e 65 74 0d 15 |00..... |planet..|
|00003680| 22 05 e1 0d 15 2c 05 3a | 0d 15 36 34 dd f2 70 6c |"....,.:|..64..pl|
|00003690| 6f 74 3a f4 20 20 20 20 | 20 20 20 20 20 20 20 20 |ot:.    |        |
|000036a0| 20 20 20 20 20 44 6f 65 | 73 20 6f 72 62 69 74 20 |     Doe|s orbit |
|000036b0| 54 72 61 63 6b 73 20 26 | 20 53 75 6e 0d 15 40 3c |Tracks &| Sun..@<|
|000036c0| c8 99 20 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |.. "OS_S|priteOp"|
|000036d0| 2c 35 31 32 2b 36 30 2c | 73 70 31 2c 73 70 5f 70 |,512+60,|sp1,sp_p|
|000036e0| 74 72 31 25 2c 30 20 b8 | 20 76 30 25 2c 76 31 25 |tr1%,0 .| v0%,v1%|
|000036f0| 2c 76 32 25 2c 76 33 25 | 0d 15 4a 1a c8 95 20 6f |,v2%,v3%|..J... o|
|00003700| 72 62 69 74 25 3d b9 3a | da 3a f0 31 33 33 2c 32 |rbit%=.:|.:.133,2|
|00003710| 2c 32 0d 15 54 0f 20 e7 | 64 72 61 77 25 3d b9 20 |,2..T. .|draw%=. |
|00003720| 8c 0d 15 5e 0a 20 20 e6 | 30 2c 35 0d 15 68 11 20 |...^.  .|0,5..h. |
|00003730| 20 e3 70 6c 61 6e 65 74 | 3d 31 b8 39 0d 15 72 22 | .planet|=1.9..r"|
|00003740| 20 20 20 ec 36 32 35 2c | 35 30 30 2b 72 61 64 28 |   .625,|500+rad(|
|00003750| 70 6c 61 6e 65 74 29 2a | 79 73 63 61 6c 65 0d 15 |planet)*|yscale..|
|00003760| 7c 0a 20 20 20 41 3d 30 | 0d 15 86 0f 20 20 20 f5 ||.   A=0|....   .|
|00003770| 20 41 2b 3d 30 2e 32 0d | 15 90 41 20 20 20 20 df | A+=0.2.|..A    .|
|00003780| 20 36 32 35 2b b5 28 41 | 29 2a 72 61 64 28 70 6c | 625+.(A|)*rad(pl|
|00003790| 61 6e 65 74 29 2a 78 73 | 63 61 6c 65 2c 35 30 30 |anet)*xs|cale,500|
|000037a0| 2b 9b 28 41 29 2a 72 61 | 64 28 70 6c 61 6e 65 74 |+.(A)*ra|d(planet|
|000037b0| 29 2a 79 73 63 61 6c 65 | 0d 15 9a 0f 20 20 20 fd |)*yscale|....   .|
|000037c0| 20 41 3e 3d 32 2a af 0d | 15 a4 0e 20 20 ed 20 70 | A>=2*..|...  . p|
|000037d0| 6c 61 6e 65 74 0d 15 ae | 06 20 cd 0d 15 b8 0c 6f |lanet...|. .....o|
|000037e0| 72 62 69 74 25 3d a3 0d | 15 c2 05 ce 0d 15 cc 0b |rbit%=..|........|
|000037f0| c8 95 20 73 75 6e 25 0d | 15 d6 0a 20 e6 30 2c 31 |.. sun%.|... .0,1|
|00003800| 34 0d 15 e0 0b 20 73 75 | 6e 25 3d a3 0d 15 ea 28 |4.... su|n%=....(|
|00003810| 20 ec 20 36 32 35 2c 35 | 30 30 3a f0 31 35 37 2c | . 625,5|00:.157,|
|00003820| 36 32 35 2c 35 31 30 3a | f4 20 20 44 72 61 77 73 |625,510:|.  Draws|
|00003830| 20 53 75 6e 0d 15 f4 05 | ce 0d 15 fe 24 c8 99 20 | Sun....|....$.. |
|00003840| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 76 30 |"OS_Spri|teOp",v0|
|00003850| 25 2c 76 31 25 2c 76 32 | 25 2c 76 33 25 0d 16 08 |%,v1%,v2|%,v3%...|
|00003860| 05 e1 0d 16 12 05 3a 0d | 16 1c 2a dd f2 6d 6f 76 |......:.|..*..mov|
|00003870| 65 3a f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e:.     |        |
|00003880| 4d 6f 76 65 73 20 74 68 | 65 20 50 6c 61 6e 65 74 |Moves th|e Planet|
|00003890| 73 0d 16 26 10 64 61 79 | 73 3d 64 61 79 73 2b 64 |s..&.day|s=days+d|
|000038a0| 61 0d 16 30 12 e3 20 70 | 6c 61 6e 65 74 3d 31 20 |a..0.. p|lanet=1 |
|000038b0| b8 20 39 0d 16 3a 0d 20 | f2 6e 65 77 76 61 6c 73 |. 9..:. |.newvals|
|000038c0| 0d 16 44 3b 20 58 3d 36 | 32 35 2b 77 62 78 2d 78 |..D; X=6|25+wbx-x|
|000038d0| 73 63 2b 28 9b 28 61 6e | 67 28 70 6c 61 6e 65 74 |sc+(.(an|g(planet|
|000038e0| 29 2a 64 61 79 73 29 2a | 72 61 64 28 70 6c 61 6e |)*days)*|rad(plan|
|000038f0| 65 74 29 29 2a 78 73 63 | 61 6c 65 0d 16 4e 3b 20 |et))*xsc|ale..N; |
|00003900| 59 3d 67 74 79 2d 34 33 | 30 2d 79 73 63 2b 28 b5 |Y=gty-43|0-ysc+(.|
|00003910| 28 61 6e 67 28 70 6c 61 | 6e 65 74 29 2a 64 61 79 |(ang(pla|net)*day|
|00003920| 73 29 2a 72 61 64 28 70 | 6c 61 6e 65 74 29 29 2a |s)*rad(p|lanet))*|
|00003930| 79 73 63 61 6c 65 0d 16 | 58 10 20 ec 20 4f 4c 44 |yscale..|X. . OLD|
|00003940| 58 2c 4f 4c 44 59 0d 16 | 62 19 e6 30 2c 30 3a 20 |X,OLDY..|b..0,0: |
|00003950| c8 8f 20 c8 90 20 58 2d | 34 2c 59 2d 34 2c 34 0d |.. .. X-|4,Y-4,4.|
|00003960| 16 6c 0a 20 ec 20 58 2c | 59 0d 16 76 1a e6 30 2c |.l. . X,|Y..v..0,|
|00003970| 31 33 3a 20 c8 8f 20 c8 | 90 20 58 2d 34 2c 59 2d |13: .. .|. X-4,Y-|
|00003980| 34 2c 34 0d 16 80 12 20 | 4f 4c 44 58 3d 58 3a 4f |4,4.... |OLDX=X:O|
|00003990| 4c 44 59 3d 59 0d 16 8a | 0b ed 70 6c 61 6e 65 74 |LDY=Y...|..planet|
|000039a0| 0d 16 94 05 e1 0d 16 9e | 05 3a 0d 16 a8 1e dd f2 |........|.:......|
|000039b0| 63 6c 69 63 6b 77 6f 72 | 6b 28 62 75 74 74 6f 6e |clickwor|k(button|
|000039c0| 25 2c 69 63 6f 6e 25 29 | 0d 16 b2 0a c8 8e 20 b9 |%,icon%)|...... .|
|000039d0| 20 ca 0d 16 bc 16 20 c9 | 20 28 62 75 74 74 6f 6e | ..... .| (button|
|000039e0| 25 20 80 20 34 29 3d 34 | 0d 16 c6 0c 20 20 c8 8e |% . 4)=4|....  ..|
|000039f0| 20 b9 20 ca 0d 16 d0 24 | 20 20 20 c9 20 69 63 6f | . ....$|   . ico|
|00003a00| 6e 25 3d 20 31 3a 64 61 | 3d 64 61 2f 32 3a e7 64 |n%= 1:da|=da/2:.d|
|00003a10| 61 3d 30 3a 64 61 3d 31 | 0d 16 da 1a 20 20 20 c9 |a=0:da=1|....   .|
|00003a20| 20 69 63 6f 6e 25 3d 20 | 32 3a 64 61 2b 3d 64 61 | icon%= |2:da+=da|
|00003a30| 2a 32 0d 16 e4 50 20 20 | 20 c9 20 69 63 6f 6e 25 |*2...P  | . icon%|
|00003a40| 3d 20 33 3a 78 73 63 61 | 6c 65 3d 78 73 63 61 6c |= 3:xsca|le=xscal|
|00003a50| 65 2a 30 2e 35 3a 79 73 | 63 61 6c 65 3d 79 73 63 |e*0.5:ys|cale=ysc|
|00003a60| 61 6c 65 2a 30 2e 35 3a | 6f 72 62 69 74 25 3d b9 |ale*0.5:|orbit%=.|
|00003a70| 3a 73 75 6e 25 3d b9 3a | 63 68 61 6e 67 65 64 25 |:sun%=.:|changed%|
|00003a80| 3d b9 0d 16 ee 4c 20 20 | 20 c9 20 69 63 6f 6e 25 |=....L  | . icon%|
|00003a90| 3d 20 35 3a 78 73 63 61 | 6c 65 3d 78 73 63 61 6c |= 5:xsca|le=xscal|
|00003aa0| 65 2a 32 3a 79 73 63 61 | 6c 65 3d 79 73 63 61 6c |e*2:ysca|le=yscal|
|00003ab0| 65 2a 32 3a 6f 72 62 69 | 74 25 3d b9 3a 73 75 6e |e*2:orbi|t%=.:sun|
|00003ac0| 25 3d b9 3a 63 68 61 6e | 67 65 64 25 3d b9 0d 16 |%=.:chan|ged%=...|
|00003ad0| f8 3e 20 20 20 c9 20 69 | 63 6f 6e 25 3d 20 34 3a |.>   . i|con%= 4:|
|00003ae0| 79 73 63 61 6c 65 3d 79 | 73 63 61 6c 65 2a 30 2e |yscale=y|scale*0.|
|00003af0| 35 3a 6f 72 62 69 74 25 | 3d b9 3a 73 75 6e 25 3d |5:orbit%|=.:sun%=|
|00003b00| b9 3a 63 68 61 6e 67 65 | 64 25 3d b9 0d 17 02 5a |.:change|d%=....Z|
|00003b10| 20 20 20 c9 20 69 63 6f | 6e 25 3d 20 36 3a 79 73 |   . ico|n%= 6:ys|
|00003b20| 63 61 6c 65 3d 79 73 63 | 61 6c 65 2a 32 3a 6f 72 |cale=ysc|ale*2:or|
|00003b30| 62 69 74 25 3d b9 3a 73 | 75 6e 25 3d b9 3a 63 68 |bit%=.:s|un%=.:ch|
|00003b40| 61 6e 67 65 64 25 3d b9 | 3a e7 20 79 73 63 61 6c |anged%=.|:. yscal|
|00003b50| 65 3e 78 73 63 61 6c 65 | 20 79 73 63 61 6c 65 3d |e>xscale| yscale=|
|00003b60| 78 73 63 61 6c 65 0d 17 | 0c 07 20 20 cb 0d 17 16 |xscale..|..  ....|
|00003b70| 06 20 cb 0d 17 20 05 e1 | 0d 17 2a 05 3a 0d 17 34 |. ... ..|..*.:..4|
|00003b80| 05 3a 0d 17 3e 13 dd 20 | f2 52 65 61 64 4d 6f 64 |.:..>.. |.ReadMod|
|00003b90| 65 56 61 72 73 0d 17 48 | 39 c8 99 20 22 4f 53 5f |eVars..H|9.. "OS_|
|00003ba0| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00003bb0| 22 2c 2d 31 2c 34 20 b8 | 20 2c 2c 58 70 69 78 25 |",-1,4 .| ,,Xpix%|
|00003bc0| 3a 58 70 69 78 25 3d 32 | 5e 58 70 69 78 25 0d 17 |:Xpix%=2|^Xpix%..|
|00003bd0| 52 39 c8 99 20 22 4f 53 | 5f 52 65 61 64 4d 6f 64 |R9.. "OS|_ReadMod|
|00003be0| 65 56 61 72 69 61 62 6c | 65 22 2c 2d 31 2c 35 20 |eVariabl|e",-1,5 |
|00003bf0| b8 20 2c 2c 59 70 69 78 | 25 3a 59 70 69 78 25 3d |. ,,Ypix|%:Ypix%=|
|00003c00| 32 5e 59 70 69 78 25 0d | 17 5c 2b c8 99 20 22 4f |2^Ypix%.|.\+.. "O|
|00003c10| 53 5f 52 65 61 64 4d 6f | 64 65 56 61 72 69 61 62 |S_ReadMo|deVariab|
|00003c20| 6c 65 22 2c 2d 31 2c 33 | 20 b8 20 2c 2c 63 6f 6c |le",-1,3| . ,,col|
|00003c30| 73 25 0d 17 66 05 e1 0d | 17 70 05 3a 0d 17 7a 3c |s%..f...|.p.:..z<|
|00003c40| f4 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00003c50| 20 20 44 61 74 61 20 69 | 73 20 6f 72 62 69 74 20 |  Data i|s orbit |
|00003c60| 64 69 61 6d 65 74 65 72 | 20 61 6e 64 20 70 65 72 |diameter| and per|
|00003c70| 69 6f 64 20 74 69 6d 65 | 0d 17 84 0d f4 20 4d 65 |iod time|..... Me|
|00003c80| 72 63 75 72 79 0d 17 8e | 10 dc 20 35 2e 37 39 2c |rcury...|.. 5.79,|
|00003c90| 37 2e 36 45 36 0d 17 98 | 0b f4 20 56 65 6e 75 73 |7.6E6...|.. Venus|
|00003ca0| 0d 17 a2 11 dc 20 31 30 | 2e 38 2c 31 2e 39 34 45 |..... 10|.8,1.94E|
|00003cb0| 37 0d 17 ac 0b f4 20 45 | 61 72 74 68 0d 17 b6 11 |7..... E|arth....|
|00003cc0| dc 20 31 34 2e 39 2c 33 | 2e 31 36 45 37 0d 17 c0 |. 14.9,3|.16E7...|
|00003cd0| 0a f4 20 4d 61 72 73 0d | 17 ca 11 dc 20 32 32 2e |.. Mars.|.... 22.|
|00003ce0| 38 2c 35 2e 39 34 45 37 | 0d 17 d4 0d f4 20 4a 75 |8,5.94E7|..... Ju|
|00003cf0| 70 69 74 65 72 0d 17 de | 11 dc 20 37 37 2e 38 2c |piter...|.. 77.8,|
|00003d00| 33 2e 37 34 45 38 0d 17 | e8 0c f4 20 53 61 74 75 |3.74E8..|... Satu|
|00003d10| 72 6e 0d 17 f2 0f dc 20 | 31 34 33 2c 39 2e 33 45 |rn..... |143,9.3E|
|00003d20| 38 0d 17 fc 0c f4 20 55 | 72 61 6e 75 73 0d 18 06 |8..... U|ranus...|
|00003d30| 10 dc 20 32 38 37 2c 32 | 2e 36 36 45 39 0d 18 10 |.. 287,2|.66E9...|
|00003d40| 0d f4 20 4e 65 70 74 75 | 6e 65 0d 18 1a 10 dc 20 |.. Neptu|ne..... |
|00003d50| 34 35 30 2c 35 2e 32 30 | 45 39 0d 18 24 0b f4 20 |450,5.20|E9..$.. |
|00003d60| 50 6c 75 74 6f 0d 18 2e | 10 dc 20 35 39 37 2c 37 |Pluto...|.. 597,7|
|00003d70| 2e 38 32 45 39 0d ff 46 | 69 6c 65 44 61 74 61 82 |.82E9..F|ileData.|
|00003d80| 21 53 70 72 69 74 65 73 | 00 00 00 e0 02 00 00 43 |!Sprites|.......C|
|00003d90| f9 ff ff f1 ce b2 f7 03 | 00 72 c0 01 00 00 00 10 |........|.r......|
|00003da0| 00 00 00 e4 02 00 00 d4 | 02 00 00 21 73 73 79 73 |........|...!ssys|
|00003db0| 74 65 6d 00 00 00 00 04 | 00 00 00 10 00 00 00 00 |tem.....|........|
|00003dc0| 00 00 00 07 00 00 00 2c | 00 00 00 80 01 00 00 0c |.......,|........|
|00003dd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003de0| 00 00 00 70 07 00 00 00 | 67 44 44 44 44 64 77 77 |...p....|gDDDDdww|
|00003df0| 44 74 77 44 77 77 47 77 | 07 00 00 00 44 77 77 77 |DtwDwwGw|....Dwww|
|00003e00| 77 47 44 64 77 47 74 77 | 44 77 77 74 07 00 00 00 |wGDdwGtw|Dwwt....|
|00003e10| 77 7e 77 7e 77 7e 77 47 | 64 77 47 77 77 74 77 77 |w~w~w~wG|dwGwwtww|
|00003e20| 07 00 00 e0 77 e7 77 7e | e7 77 e7 77 47 74 77 74 |....w.w~|.w.wGtwt|
|00003e30| 77 47 77 77 07 00 00 00 | 7e e7 ee ee ee 77 7e 77 |wGww....|~....w~w|
|00003e40| 77 47 77 ff 7f 47 77 77 | 07 00 00 0e e6 ee ee ee |wGw..Gww|........|
|00003e50| ee ee 77 ee 77 77 74 77 | 74 77 74 77 07 00 00 00 |..w.wwtw|twtw....|
|00003e60| ee ee ee ee ee ee 7e 77 | 77 77 74 77 74 77 74 77 |......~w|wwtwtwtw|
|00003e70| 07 00 00 ee ee ee ee ee | ee ee ee ee 77 c7 cc 77 |........|....w..w|
|00003e80| 74 77 74 77 07 00 00 00 | ee ee ee ee ee ee 7e 77 |twtw....|......~w|
|00003e90| 77 77 74 77 74 77 74 77 | 07 00 00 0e e6 ee ee ee |wwtwtwtw|........|
|00003ea0| ee ee 77 ee 77 77 74 77 | 74 77 74 77 07 00 00 00 |..w.wwtw|twtw....|
|00003eb0| 7e e7 ee ee ee 77 7e 77 | 77 47 77 47 77 47 77 77 |~....w~w|wGwGwGww|
|00003ec0| 07 00 00 e0 77 e7 77 7e | e7 77 e7 77 47 74 77 74 |....w.w~|.w.wGtwt|
|00003ed0| 77 47 77 77 00 00 00 00 | 77 7e 77 7e 77 7e 77 47 |wGww....|w~w~w~wG|
|00003ee0| 64 77 47 77 77 74 77 77 | 00 00 00 00 44 77 77 77 |dwGwwtww|....Dwww|
|00003ef0| 77 47 44 64 77 47 74 77 | aa 7a 77 74 00 00 00 00 |wGDdwGtw|.zwt....|
|00003f00| 67 44 44 44 44 64 77 77 | 44 74 77 44 77 77 47 77 |gDDDDdww|DtwDwwGw|
|00003f10| 00 00 00 00 44 77 77 77 | 77 47 44 44 77 77 44 77 |....Dwww|wGDDwwDw|
|00003f20| 77 47 74 77 07 00 00 ff | ff ff ff ff ff ff ff ff |wGtw....|........|
|00003f30| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f40| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f50| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f60| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f70| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f80| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003f90| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003fa0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003fb0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003fc0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003fd0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003fe0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003ff0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004000| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004010| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004020| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004030| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004040| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004050| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004060| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004070| ff ff ff ff ff ff ff ff | ff ff ff 46 69 6c 65 44 |........|...FileD|
|00004080| 61 74 61 82 54 65 6d 70 | 6c 61 74 65 73 00 00 0f |ata.Temp|lates...|
|00004090| 04 00 00 44 ec ff ff c1 | 7d 09 ea 03 00 45 e7 ff |...D....|}....E..|
|000040a0| ff ff ff 00 00 00 00 00 | 00 00 00 00 00 00 00 5c |........|.......\|
|000040b0| 00 00 00 b6 01 00 00 01 | 00 00 00 70 72 6f 67 49 |........|...progI|
|000040c0| 6e 66 6f 0d 72 65 6f 12 | 02 00 00 78 01 00 00 01 |nfo.reo.|...x....|
|000040d0| 00 00 00 77 6f 72 6b 0d | 27 22 29 3a 71 25 3d 8a |...work.|'"):q%=.|
|000040e0| 03 00 00 85 00 00 00 01 | 00 00 00 6d 61 69 6e 77 |........|...mainw|
|000040f0| 0d 41 41 25 2b 22 29 00 | 00 00 00 02 00 00 00 88 |.AA%+").|........|
|00004100| 00 00 00 7e 02 00 00 60 | 01 00 00 00 00 00 00 00 |...~...`|........|
|00004110| 00 00 00 ff ff ff ff 12 | 00 00 84 07 02 07 01 0c |........|........|
|00004120| 0e 0c 00 00 00 00 00 00 | fc ff ff 00 05 00 00 00 |........|........|
|00004130| 00 00 00 3d 01 00 00 00 | 30 00 00 01 00 00 00 00 |...=....|0.......|
|00004140| 00 00 00 78 01 00 00 ff | ff ff ff 13 00 00 00 09 |...x....|........|
|00004150| 00 00 00 a4 02 00 00 34 | ff ff ff 54 03 00 00 64 |.......4|...T...d|
|00004160| ff ff ff 3d 30 00 b7 0d | 4b 0d 74 69 74 6c 65 64 |...=0...|K.titled|
|00004170| 3e 0d fe 9a 00 00 00 cc | ff ff ff 76 02 00 00 fc |>.......|...v....|
|00004180| ff ff ff 3d 60 00 07 53 | 53 79 73 74 65 6d 0d 28 |...=`..S|System.(|
|00004190| 00 00 00 9a 00 00 00 98 | ff ff ff 76 02 00 00 c8 |........|...v....|
|000041a0| ff ff ff 3d 61 00 07 8b | 01 00 00 ff ff ff ff 1b |...=a...|........|
|000041b0| 00 00 00 9a 00 00 00 64 | ff ff ff 76 02 00 00 94 |.......d|...v....|
|000041c0| ff ff ff 3d 61 00 07 a6 | 01 00 00 ff ff ff ff 28 |...=a...|.......(|
|000041d0| 00 00 00 9a 00 00 00 30 | ff ff ff 76 02 00 00 60 |.......0|...v...`|
|000041e0| ff ff ff 3d 61 00 07 b5 | 01 00 00 ff ff ff ff 1e |...=a...|........|
|000041f0| 00 00 00 3e 00 00 00 d0 | ff ff ff 9a 00 00 00 f8 |...>....|........|
|00004200| ff ff ff 19 00 00 17 4e | 61 6d 65 3a 0d 6c 65 64 |.......N|ame:.led|
|00004210| 3e 0d fe 0e 00 00 00 9c | ff ff ff 9a 00 00 00 c4 |>.......|........|
|00004220| ff ff ff 19 00 00 17 50 | 75 72 70 6f 73 65 3a 0d |.......P|urpose:.|
|00004230| 3e 0d fe 1e 00 00 00 68 | ff ff ff 9a 00 00 00 90 |>......h|........|
|00004240| ff ff ff 19 00 00 17 41 | 75 74 68 6f 72 3a 0d 64 |.......A|uthor:.d|
|00004250| 3e 0d fe 0e 00 00 00 38 | ff ff ff 9a 00 00 00 60 |>......8|.......`|
|00004260| ff ff ff 19 00 00 17 56 | 65 72 73 69 6f 6e 3a 0d |.......V|ersion:.|
|00004270| 3e 0d fe 41 62 6f 75 74 | 20 74 68 69 73 20 70 72 |>..About| this pr|
|00004280| 6f 67 72 61 6d 0d 53 6f | 6c 61 72 20 53 79 73 74 |ogram.So|lar Syst|
|00004290| 65 6d 20 44 65 6d 6f 6e | 73 74 72 61 74 69 6f 6e |em Demon|stration|
|000042a0| 0d a9 20 52 6f 62 65 72 | 74 20 53 65 61 67 6f 0d |.. Rober|t Seago.|
|000042b0| 0d 66 01 00 00 1c 02 00 | 00 b4 02 00 00 c4 02 00 |.f......|........|
|000042c0| 00 00 00 00 00 00 00 00 | 00 ff ff ff ff 12 00 04 |........|........|
|000042d0| 87 07 02 07 01 03 01 0c | 00 00 00 00 00 58 ff ff |........|.....X..|
|000042e0| ff 4e 01 00 00 00 00 00 | 00 3d 00 00 00 00 30 00 |.N......|.=....0.|
|000042f0| 00 01 00 00 00 00 00 00 | 00 43 68 61 6e 67 65 73 |........|.Changes|
|00004300| 0d 0d 3e 0d 65 09 00 00 | 00 36 00 00 00 c8 ff ff |..>.e...|.6......|
|00004310| ff 1e 01 00 00 f8 ff ff | ff 2d 00 00 07 53 70 65 |........|.-...Spe|
|00004320| 65 64 0d 83 01 12 00 01 | ff 0e 00 00 00 c8 ff ff |ed......|........|
|00004330| ff 36 00 00 00 f8 ff ff | ff 3d 60 00 c7 8a 0d 00 |.6......|.=`.....|
|00004340| 00 45 52 83 01 12 00 21 | ff 1c 01 00 00 c8 ff ff |.ER....!|........|
|00004350| ff 44 01 00 00 f8 ff ff | ff 3d 60 00 c7 8b 0d 00 |.D......|.=`.....|
|00004360| 00 45 52 83 01 12 00 21 | ff 0e 00 00 00 94 ff ff |.ER....!|........|
|00004370| ff 36 00 00 00 c4 ff ff | ff 3d 60 00 c7 8a 0d 00 |.6......|.=`.....|
|00004380| 00 45 52 83 01 12 00 21 | ff 0e 00 00 00 60 ff ff |.ER....!|.....`..|
|00004390| ff 36 00 00 00 90 ff ff | ff 3d 60 00 c7 8a 0d 00 |.6......|.=`.....|
|000043a0| 00 45 52 83 01 12 00 21 | ff 1c 01 00 00 94 ff ff |.ER....!|........|
|000043b0| ff 44 01 00 00 c4 ff ff | ff 3d 60 00 c7 8b 0d 00 |.D......|.=`.....|
|000043c0| 00 45 52 83 01 12 00 21 | ff 1c 01 00 00 60 ff ff |.ER....!|.....`..|
|000043d0| ff 44 01 00 00 90 ff ff | ff 3d 60 00 c7 8b 0d 00 |.D......|.=`.....|
|000043e0| 00 45 52 83 01 12 00 21 | ff 36 00 00 00 94 ff ff |.ER....!|.6......|
|000043f0| ff 1e 01 00 00 c4 ff ff | ff 2d 00 00 07 5a 6f 6f |........|.-...Zoo|
|00004400| 6d 0d 0d 83 01 12 00 01 | ff 36 00 00 00 60 ff ff |m.......|.6...`..|
|00004410| ff 1e 01 00 00 90 ff ff | ff 2d 00 00 07 56 69 65 |........|.-...Vie|
|00004420| 77 0d 0d 83 01 12 00 01 | ff 02 00 00 00 2c 00 00 |w.......|.....,..|
|00004430| 00 d6 04 00 00 c8 03 00 | 00 00 00 00 00 f8 ff ff |........|........|
|00004440| ff 75 f9 83 01 12 00 05 | ff 07 02 07 07 03 01 0c |.u......|........|
|00004450| 00 00 00 00 00 5c fc ff | ff d4 04 00 00 f8 ff ff |.....\..|........|
|00004460| ff 3d 01 00 00 00 00 00 | 00 01 00 00 00 00 00 00 |.=......|........|
|00004470| 00 78 00 00 00 ff ff ff | ff 16 00 00 00 01 00 00 |.x......|........|
|00004480| 00 fe ff ff ff 5a fc ff | ff d2 04 00 00 08 00 00 |.....Z..|........|
|00004490| 00 06 60 00 07 73 63 72 | 65 65 6e 0d ff 0c 00 00 |..`..scr|een.....|
|000044a0| 00 53 6f 6c 61 72 20 53 | 79 73 74 65 6d 0d       |.Solar S|ystem.  |
+--------+-------------------------+-------------------------+--------+--------+